]> diplodocus.org Git - minc/commitdiff
Idiot. Put error messages to STDERR where they belong.
authorepg <>
Sat, 28 Dec 2002 01:26:49 +0000 (01:26 +0000)
committerepg <>
Sat, 28 Dec 2002 01:26:49 +0000 (01:26 +0000)
minc

diff --git a/minc b/minc
index 04a7d68..6efc7fd 100755 (executable)
--- a/minc
+++ b/minc
@@ -264,12 +264,12 @@ sub log_headers {
 # Utility procedures
 
 sub _errprint {
-    printf('%s:%s', __FILE__, __LINE__);
+    printf(STDERR '%s:%s', __FILE__, __LINE__);
 
     if (@_) {
-        print(': ');
+        print(STDERR ': ');
         foreach (@_) {
-            print;
+            print(STDERR);
         }
     }
 }
@@ -278,7 +278,7 @@ sub err {
     my $ex = shift;
 
     _errprint(@_);
-    print(": $!\n");
+    print(STDERR ": $!\n");
 
     exit($ex);
 }
@@ -287,7 +287,7 @@ sub errx {
     my $ex = shift;
 
     _errprint(@_);
-    print("\n");
+    print(STDERR "\n");
 
     exit($ex);
 }
@@ -477,7 +477,7 @@ sub get_headers {
             # folded header continuation
 
             if (not defined($current)) {
-                print("Malformed message, cannot parse headers.\n");
+                print(STDERR "Malformed message, cannot parse headers.\n");
                 return ();
             }