[rt-commit] [svn] r518 - rt/branches/rt-3.1/bin

[jesse at fsck.com]

Author: jesse
Date: Tue Mar  9 17:23:02 2004
New Revision: 518

Modified:
   rt/branches/rt-3.1/bin/rt.in
Log:
#5089: More preparation for the RT shell from AMS


Modified: rt/branches/rt-3.1/bin/rt.in
==============================================================================
--- rt/branches/rt-3.1/bin/rt.in	(original)
+++ rt/branches/rt-3.1/bin/rt.in	Tue Mar  9 17:23:02 2004
@@ -461,7 +461,7 @@
 
     if ($output) {
         print $text;
-        exit;
+        return;
     }
 
     my $synerr = 0;
@@ -487,7 +487,7 @@
             }
             else {
                 print $r->content;
-                exit -1;
+                return;
             }
         }
         print $r->content;
@@ -516,7 +516,7 @@
             if (/-a/) {
                 unless (-f $ARGV[0] && -r $ARGV[0]) {
                     whine "Cannot read attachment: '$ARGV[0]'.";
-                    exit -1;
+                    return;
                 }
                 push @files, shift @ARGV;
             }
@@ -566,7 +566,7 @@
 
         do {
             my $ntext = vi($text);
-            exit if ($error && $ntext eq $text);
+            return if ($error && $ntext eq $text);
             $text = $ntext;
             $form = Form::parse($text);
             $error = 0;
@@ -578,7 +578,7 @@
                 goto NEXT;
             }
             elsif (!@$o) {
-                exit;
+                return;
             }
             @files = @{ vsplit($k->{Attachment}) };