diff options
author | Larry Wall <lwall@jpl-devvax.jpl.nasa.gov> | 1990-02-28 21:54:46 +0000 |
---|---|---|
committer | Larry Wall <lwall@jpl-devvax.jpl.nasa.gov> | 1990-02-28 21:54:46 +0000 |
commit | afd9f252e30d37007c653bd21680f0b5f6c32608 (patch) | |
tree | 8be1940ec2b673c8419eadd321d41e7e1a05b30c /lib/complete.pl | |
parent | 449aadcac0f13893f2b716ea169bf74293ee9c41 (diff) | |
download | perl-afd9f252e30d37007c653bd21680f0b5f6c32608.tar.gz |
perl 3.0 patch #10 patch #9, continued
See patch #9.
Diffstat (limited to 'lib/complete.pl')
-rw-r--r-- | lib/complete.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/complete.pl b/lib/complete.pl index 334d5390c6..b59bee32ee 100644 --- a/lib/complete.pl +++ b/lib/complete.pl @@ -25,6 +25,7 @@ sub Complete { local ($prompt) = shift (@_); local ($c, $cmp, $l, $r, $ret, $return, $test); @_cmp_lst = sort @_; + local($[) = 0; system 'stty raw -echo'; loop: { print $prompt, $return; |