diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/sigtrap.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/sigtrap.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/tlperl/lib/sigtrap.pm b/Master/tlpkg/tlperl/lib/sigtrap.pm index de520a03be8..025845eb63d 100644 --- a/Master/tlpkg/tlperl/lib/sigtrap.pm +++ b/Master/tlpkg/tlperl/lib/sigtrap.pm @@ -8,7 +8,7 @@ sigtrap - Perl pragma to enable simple signal handling use Carp; -$VERSION = 1.05; +$VERSION = 1.06; $Verbose ||= 0; sub import { @@ -115,7 +115,7 @@ sub handler_traceback { } elsif ($s eq '(eval)') { $s = "eval {...}"; } - $f = "file `$f'" unless $f eq '-e'; + $f = "file '$f'" unless $f eq '-e'; $mess = "$w$s$a called from $f line $l\n"; syswrite(STDERR, $mess, length($mess)); } |