[Rt-commit] r5143 - in rt/branches/3.5-TESTING: .

kevinr at bestpractical.com kevinr at bestpractical.com
Mon May 1 15:57:55 EDT 2006


Author: kevinr
Date: Mon May  1 15:57:50 2006
New Revision: 5143

Modified:
   rt/branches/3.5-TESTING/   (props changed)
   rt/branches/3.5-TESTING/bin/rt.in

Log:
 r12456 at sad-girl-in-snow:  kevinr | 2006-05-01 15:57:14 -0400
 * Applied David Schweikert's patch to only invoke Term::ReadLine when we're 
 actually going to be using it.


Modified: rt/branches/3.5-TESTING/bin/rt.in
==============================================================================
--- rt/branches/3.5-TESTING/bin/rt.in	(original)
+++ rt/branches/3.5-TESTING/bin/rt.in	Mon May  1 15:57:50 2006
@@ -82,9 +82,7 @@
 my $session = new Session("$HOME/.rt_sessions");
 my $REST = "$config{server}/REST/1.0";
 
-my $term = new Term::ReadLine 'RT CLI';
 my $prompt = 'rt> ';
-my $TERM_OUT = $term->OUT || \*STDOUT;
 
 sub whine;
 sub DEBUG { warn @_ if $config{debug} >= shift }
@@ -155,6 +153,7 @@
 
 sub shell {
     $|=1;
+    my $term = new Term::ReadLine 'RT CLI';
     while ( defined ($_ = $term->readline($prompt)) ) {
         next if /^#/ || /^\s*$/;
 


More information about the Rt-commit mailing list