Parent Directory | Revision Log | Patch
revision 1116 by dpavlin, Sun Nov 30 18:54:48 2008 UTC | revision 1117 by dpavlin, Mon Jun 29 18:52:50 2009 UTC | |
---|---|---|
# | Line 23 sub as_markup { | Line 23 sub as_markup { |
23 | ||
24 | my $inc; | my $inc; |
25 | map { | map { |
s{.pm$}{}; | ||
26 | my $class = $_; | my $class = $_; |
27 | s[/][}->{]g; | my $path = $_; |
28 | $path =~ s{.pm$}{}; | |
29 | $path =~ s[/][}->{]g; | |
30 | $class =~ s[/][::]g; | $class =~ s[/][::]g; |
31 | eval '$inc->{' . $_ . '} = $class'; | eval '$inc->{' . $path . '} = $class'; ## no critic |
32 | } sort keys %INC; | } sort keys %INC; |
33 | ||
34 | $html = dump( $inc ); | $html = dump( $inc ); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |