From: P. J. McDermott Date: Sun, 22 Sep 2013 21:21:06 +0000 (-0400) Subject: Allow input and output to both be "-". X-Git-Tag: ssic/1.0.0~31 X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=c7dbd598e3cddc3161bc718f9ea9df6f15f8fdd6;p=ssic.git Allow input and output to both be "-". --- diff --git a/src/ssic.pl b/src/ssic.pl index d678556..8ecc30e 100644 --- a/src/ssic.pl +++ b/src/ssic.pl @@ -111,7 +111,7 @@ sub compile my $var_name; my $var_value; - if ($input eq $output) { + if ($input eq $output and $input ne "-") { error(4, "Input and output files are equal\n"); }