Changeset 563 for trunk/wiki.cgi
- Timestamp:
- 11/26/04 12:21:35 (4 years ago)
- Files:
-
- 1 modified
-
trunk/wiki.cgi (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/wiki.cgi
r559 r563 67 67 do_search($search_terms); 68 68 } elsif ($action eq 'show_backlinks') { 69 show_backlinks($node);69 $guide->show_backlinks( id => $node ); 70 70 } elsif ($action eq 'show_wanted_pages') { 71 71 show_wanted_pages(); … … 292 292 } 293 293 294 sub show_backlinks {295 my $node = shift;296 my @backlinks = $wiki->list_backlinks( node => $node );297 my @results = map {298 { url => $q->escape($formatter->node_name_to_node_param($_)),299 title => $q->escapeHTML($_)300 } } sort @backlinks;301 my %tt_vars = ( results => \@results,302 num_results => scalar @results,303 not_deletable => 1,304 deter_robots => 1,305 not_editable => 1 );306 process_template("backlink_results.tt", $node, \%tt_vars);307 }308 309 294 sub show_wanted_pages { 310 295 my @dangling = $wiki->list_dangling_links;
