From 874cafcd1d826d03066055b80c7900cae706f9c8 Mon Sep 17 00:00:00 2001
From: P. J. McDermott <pjm@nac.net>
Date: Mon, 23 Sep 2013 10:04:16 -0400
Subject: Only rename output file if it's not "-".

---
diff --git a/src/ssic.pl b/src/ssic.pl
index ba8b184..81bb50d 100755
--- a/src/ssic.pl
+++ b/src/ssic.pl
@@ -173,10 +173,9 @@ sub compile
 	}
 	if ($output ne "-") {
 		close($output_fh);
-	}
-
-	if (not rename($output . "~", $output)) {
-		error(4, "%s: %s\n", $output, $!);
+		if (not rename($output . "~", $output)) {
+			error(4, "%s: %s\n", $output, $!);
+		}
 	}
 }
 
--
cgit v0.9.1