/[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 575 by dpavlin, Fri Nov 28 00:05:55 2008 UTC
# Line 1  Line 1 
1  package Frey;  package Frey;
2  use Moose;  use Moose;
3    
4  our $VERSION = "0.21";  our $VERSION = "0.22";
5    
6    use Data::Dump qw//;
7    sub dump { Data::Dump::dump ( @_ ) }
8    
9  has 'debug' => (  has 'debug' => (
10          is => 'rw',          is => 'rw',
11          isa => 'Bool',          isa => 'Int',
12          default => 0,          default => 0,
13  );  );
14    
# Line 57  implemented by L<Frey::ObjectBrowser>. Line 60  implemented by L<Frey::ObjectBrowser>.
60    
61  =cut  =cut
62    
 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;  
 }  
   
63  1;  1;
Legend:
Removed from v.468  
changed lines
  Added in v.575
  ViewVC Help
Powered by ViewVC 1.1.26