This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 94c40ca) | patch
fresh_perl_(is|like) were printing out the wrong file/line
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 27 Jul 2003 19:45:22 +0000 (19:45 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 27 Jul 2003 19:45:22 +0000 (19:45 +0000)
commitdcc7f48117e0d8d95c3ad7e7d270188fbf5e9ec8
treefbb2e8edc2fe701f49a1869b1d19dcdd52ca1e17tree | snapshot
parent94c40caf430c7b27d6deb49a7d2887373dff1171commit | diff
fresh_perl_(is|like) were printing out the wrong file/line
number on failure because _where() was hard coded to only
look one level up the call stack.  In these cases it has to
look two.
(Schwern)

p4raw-id: //depot/perl@20240
t/test.pl diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.