diff options
| author | Larry Wall <larry@netlabs.com> | 1993-12-10 00:00:00 +0000 |
|---|---|---|
| committer | Larry Wall <larry@netlabs.com> | 1993-12-10 00:00:00 +0000 |
| commit | ed6116ce9b9d13712ea252ee248b0400653db7f9 (patch) | |
| tree | 348e8de37401fa4381f6bfe0989abef2e3b409e0 /lib/termcap.pl | |
| parent | 9bbf408117c16189b372e6657c9e5a15d01ea504 (diff) | |
| download | perl-ed6116ce9b9d13712ea252ee248b0400653db7f9.tar.gz | |
perl 5.0 alpha 5
[editor's note: the sparc executables have not been included,
and emacs backup files and other cruft such as patch backup files have
been removed. This was reconstructed from a tarball found on the
September 1994 InfoMagic CD]
Diffstat (limited to 'lib/termcap.pl')
| -rw-r--r-- | lib/termcap.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/termcap.pl b/lib/termcap.pl index 5b48d71720..22c18179d8 100644 --- a/lib/termcap.pl +++ b/lib/termcap.pl @@ -33,7 +33,7 @@ sub Tgetent { while (<TERMCAP>) { next if /^#/; next if /^\t/; - if (/(^|\\|)$TERM[:\\|]/) { + if (/(^|\\|)$TERM\[:\\|]/) { chop; while (chop eq '\\\\') { \$_ .= <TERMCAP>; |