/[cvs]/joko/Scripts/psh/lib/MJAM/Command/Shell.pm
ViewVC logotype

Diff of /joko/Scripts/psh/lib/MJAM/Command/Shell.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by cvsjoko, Sat Jun 15 07:45:19 2002 UTC revision 1.3 by cvsjoko, Sat Jun 15 08:10:01 2002 UTC
# Line 1  Line 1 
1    #!/usr/bin/perl
2    ##
3    ## MJAM::Command::Shell -- CommandShell
4    ##
5    ## $Id$
6    ##
7    ## $Log$
8    ## Revision 1.3  2002/06/15 08:10:01  cvsjoko
9    ## + modifications in Term::ReadKey behaviour
10    ## + header
11    ##
12    ##
13    ##
14  package MJAM::Command::Shell;  package MJAM::Command::Shell;
15    
16  use strict;  use strict;
# Line 120  sub lCmd { Line 133  sub lCmd {
133        
134    #if ($cmd eq 'quit' || $cmd eq 'exit') { exit; }    #if ($cmd eq 'quit' || $cmd eq 'exit') { exit; }
135    if ($cmd eq 'quit' || $cmd eq 'exit') {    if ($cmd eq 'quit' || $cmd eq 'exit') {
136      ReadMode 1;      ReadMode 0;
137      exit;      exit;
138    }    }
139        
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed