/[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 468 by dpavlin, Wed Nov 19 19:59:52 2008 UTC revision 532 by dpavlin, Wed Nov 26 07:57:12 2008 UTC
# Line 5  our $VERSION = "0.21"; Line 5  our $VERSION = "0.21";
5    
6  has 'debug' => (  has 'debug' => (
7          is => 'rw',          is => 'rw',
8          isa => 'Bool',          isa => 'Int',
9          default => 0,          default => 0,
10  );  );
11    
# Line 57  implemented by L<Frey::ObjectBrowser>. Line 57  implemented by L<Frey::ObjectBrowser>.
57    
58  =cut  =cut
59    
 use Data::Dump qw/dump/;  
   
 our @warnings;  
 $SIG{__WARN__} = sub {  
         # emit original warning  
         warn(@_);  
   
         push @warnings, $_ foreach @_;  
 };  
   
 sub warnings {  
         #print STDERR "### warnings ",dump( @warnings );  
         @warnings;  
 }  
   
60  1;  1;
Legend:
Removed from v.468  
changed lines
  Added in v.532
  ViewVC Help
Powered by ViewVC 1.1.26