Parent Directory | Revision Log | Patch
revision 30 by dpavlin, Sun Jun 29 16:29:09 2008 UTC | revision 31 by dpavlin, Sun Jun 29 20:49:42 2008 UTC | |
---|---|---|
# | Line 38 has 'classes' => ( | Line 38 has 'classes' => ( |
38 | return; | return; |
39 | } | } |
40 | warn ">> $_ ",dump( @a ) if $self->debug; | warn ">> $_ ",dump( @a ) if $self->debug; |
41 | warn "## $a[1]::$a[2]\n"; | my $package = "$a[1]::$a[2]"; |
42 | push @$classes, join('::', @a); | warn "## $package\n"; |
43 | push @$classes, $package; | |
44 | } }, 'lib'); | } }, 'lib'); |
45 | warn "## classes = ",dump( $classes ) if $self->debug; | warn "## classes = ",dump( $classes ) if $self->debug; |
46 | $classes; | $classes; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |