Parent Directory | Revision Log | Patch
revision 572 by dpavlin, Mon Nov 1 14:55:16 2004 UTC | revision 573 by dpavlin, Mon Nov 1 15:29:17 2004 UTC | |
---|---|---|
# | Line 358 my @tree = ({ | Line 358 my @tree = ({ |
358 | ||
359 | my $tree = new WebPAC::Tree( | my $tree = new WebPAC::Tree( |
360 | tree => \@tree, | tree => \@tree, |
361 | detail_url => sub { | |
362 | my $mfn = shift; | |
363 | my $url = "./out/thes/${mfn}.html"; | |
364 | return $url if (-e $url); | |
365 | }, | |
366 | ); | ); |
367 | ||
368 | $tree->output( | $tree->output( |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |