/[webpac]/trunk2/all2all.pl
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 /trunk2/all2all.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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(
Legend:
Removed from v.572  
changed lines
  Added in v.573
  ViewVC Help
Powered by ViewVC 1.1.26