/[Frey]/trunk/lib/Frey.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 463 by dpavlin, Wed Nov 19 18:07:31 2008 UTC revision 468 by dpavlin, Wed Nov 19 19:59:52 2008 UTC
# Line 57  implemented by L<Frey::ObjectBrowser>. Line 57  implemented by L<Frey::ObjectBrowser>.
57    
58  =cut  =cut
59    
60    use Data::Dump qw/dump/;
61    
62    our @warnings;
63    $SIG{__WARN__} = sub {
64            # emit original warning
65            warn(@_);
66    
67            push @warnings, $_ foreach @_;
68    };
69    
70    sub warnings {
71            #print STDERR "### warnings ",dump( @warnings );
72            @warnings;
73    }
74    
75  1;  1;

Legend:
Removed from v.463  
changed lines
  Added in v.468

  ViewVC Help
Powered by ViewVC 1.1.26