[svn:parrot] r16785 - trunk

[coke]

Author: coke
Date: Wed Jan 24 18:26:20 2007
New Revision: 16785

Modified:
   trunk/   (props changed)
   trunk/parrotbug

Log:
Avoid warnings on ^D for parrotbug subject


Modified: trunk/parrotbug
==============================================================================
--- trunk/parrotbug     (original)
+++ trunk/parrotbug     Wed Jan 24 18:26:20 2007
@@ -428,6 +428,7 @@
           . "Please be more verbose.\n";
         print "Subject: ";
         $subject = <STDIN>;
+        $subject = q{} unless defined $subject;
         chomp $subject;
         die "Aborting.\n" if $err++ == 5;
     } while ( trivial_subject($subject) );