Changeset 390

Show
Ignore:
Timestamp:
12/19/01 01:50:10
Author:
miyagawa
Message:

escape $Log $

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Log-Dispatch-Config/trunk/lib/Log/Dispatch/Config.pm

    r388 r390  
    131131        # caller() might be slow 
    132132        if ($needs_caller) { 
    133             my $depth = $Log$ 
    134             my $depth = Revision 1.15  2001/12/18 16:46:39  miyagawa 
    135             my $depth = caller stack 
    136             my $depth =stack; 
     133            my $depth = $Log::Dispatch::Config::CallerDepth 
     134                + $stack; 
    137135            @p{qw(package filename line)} = caller($depth); 
    138136        }