--- trunk2/all2all.pl 2004/10/31 18:43:33 566 +++ trunk2/all2all.pl 2004/11/01 22:15:41 579 @@ -276,6 +276,7 @@ return(9, $l->{"a:$code:"} ) if (defined($l->{"a:$code:"})); }, style => 'display: none', + iframe => 1, },{ # 1 code_arr => sub { @{$_[0]} }, @@ -293,7 +294,7 @@ lookup_term => sub { shift @{$l->{"d:".$_[0]}} }, lookup_mfn => sub { shift @{$l->{"900_mfn:".$_[0]}} }, have_children => sub { return $l->{"a:".$_[1].":".$_[0]} }, - #style => 'display: none', + style => 'display: none', },{ # 3 uži pojam code_arr => sub { @{$_[0]} }, @@ -357,19 +358,29 @@ my $tree = new WebPAC::Tree( tree => \@tree, + detail_url => sub { + my $mfn = shift; + my $url = "thes/${mfn}.html"; + return $url if (-e "./out/$url"); + }, + nodes_dir => 'nodes', ); $tree->output( dir => './out', html => 'browse.html', - template => './output_template/tree.tt', + template_dir => './output_template/', + template_tree => 'tree.tt', + template_node => 'node.tt', js => 'tree-ids.js', ); $tree->output( dir => './eurovoc', html => 'hijerarhija.html', - template => './output_template/hijerarhija.tt', + template_dir => './output_template/', + template_tree => 'hijerarhija.tt', + template_node => 'hijerarhija_node.tt', js => 'tree-ids.js', );