Changeset 24346

Show
Ignore:
Timestamp:
11/19/08 23:42:18 (4 years ago)
Author:
kazuho
Message:

escape funcname

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/NanoA/trunk/lib/NanoA/DebugScreen.pm

    r24345 r24346  
    7575                '', 
    7676                '<li>', 
    77                 'in ' . ($stack->{func} || ''), 
     77                $stack->{func} ? NanoA::escape_html("in $stack->{func}") : '', 
    7878                ' at ', 
    7979                $stack->{file} ? NanoA::escape_html($stack->{file}) : '',