5 |
## $Id$ |
## $Id$ |
6 |
## |
## |
7 |
## $Log$ |
## $Log$ |
8 |
|
## Revision 1.4 2002/06/15 08:15:50 cvsjoko |
9 |
|
## + bugfixes in ReadKey-behavious for Linux |
10 |
|
## |
11 |
## Revision 1.3 2002/06/15 08:10:01 cvsjoko |
## Revision 1.3 2002/06/15 08:10:01 cvsjoko |
12 |
## + modifications in Term::ReadKey behaviour |
## + modifications in Term::ReadKey behaviour |
13 |
## + header |
## + header |
136 |
|
|
137 |
#if ($cmd eq 'quit' || $cmd eq 'exit') { exit; } |
#if ($cmd eq 'quit' || $cmd eq 'exit') { exit; } |
138 |
if ($cmd eq 'quit' || $cmd eq 'exit') { |
if ($cmd eq 'quit' || $cmd eq 'exit') { |
139 |
ReadMode 0; |
ReadMode 1; |
140 |
exit; |
exit; |
141 |
} |
} |
142 |
|
|