/[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 455 by dpavlin, Wed Nov 19 15:28:23 2008 UTC revision 468 by dpavlin, Wed Nov 19 19:59:52 2008 UTC
# Line 1  Line 1 
1  package Frey;  package Frey;
2  use Moose;  use Moose;
3    
4  our $VERSION = "0.20";  our $VERSION = "0.21";
5    
6  has 'debug' => (  has 'debug' => (
7          is => 'rw',          is => 'rw',
# 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.455  
changed lines
  Added in v.468

  ViewVC Help
Powered by ViewVC 1.1.26