/[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 50 by dpavlin, Wed Jul 2 22:30:19 2008 UTC revision 56 by dpavlin, Sun Jul 6 11:59:58 2008 UTC
# Line 4  use Moose; Line 4  use Moose;
4  has 'debug' => (  has 'debug' => (
5          is => 'rw',          is => 'rw',
6          isa => 'Bool',          isa => 'Bool',
7          default => 1,          default => 0,
8  );  );
9    
10  =head1 NAME  =head1 NAME
# Line 40  has 'classes' => ( Line 40  has 'classes' => (
40                          warn ">> $_ ",dump( @a ) if $self->debug;                          warn ">> $_ ",dump( @a ) if $self->debug;
41                          my $package = "$a[1]::$a[2]";                          my $package = "$a[1]::$a[2]";
42                          warn "## $package\n";                          warn "## $package\n";
43                          push @$classes, $package;                          push @$classes, { $package => "$_.pm" };
44                  } }, 'lib');                  } }, 'lib');
45                  warn "## classes = ",dump( $classes ) if $self->debug;                  warn "## classes = ",dump( $classes ) if $self->debug;
46                  $classes;                  $classes;
Legend:
Removed from v.50  
changed lines
  Added in v.56
  ViewVC Help
Powered by ViewVC 1.1.26