Changeset 393
- Timestamp:
- 06/12/04 17:15:14 (4 years ago)
- Location:
- trunk
- Files:
-
- 5 modified
-
lib/OpenGuides.pm (modified) (1 diff)
-
t/53_show_index.t (modified) (3 diffs)
-
templates/header.tt (modified) (1 diff)
-
templates/site_index.tt (modified) (1 diff)
-
wiki.cgi (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/OpenGuides.pm
r392 r393 384 384 my $name = ucfirst($args{type}) . " $args{value}" ; 385 385 my $url = $self->config->{_}->{script_name} 386 . "?" 386 387 . ucfirst( $args{type} ) 387 388 . "_" -
trunk/t/53_show_index.t
r384 r393 3 3 use Config::Tiny; 4 4 use OpenGuides; 5 use Test::More tests => 4;5 use Test::More tests => 6; 6 6 7 7 eval { require DBD::SQLite; }; … … 9 9 10 10 SKIP: { 11 skip "DBD::SQLite not installed - no database to test with", 411 skip "DBD::SQLite not installed - no database to test with", 6 12 12 unless $have_sqlite; 13 13 … … 48 48 }; 49 49 is( $@, "", "->show_index doesn't die" ); 50 like( $output, qr|wiki.cgi\?Test_Page|, 51 "...and includes correct links" ); 52 unlike( $output, qr|<title>\s*-|, "...sets <title> correctly" ); 53 50 54 $output = $guide->show_index( 51 55 type => "category", -
trunk/templates/header.tt
r339 r393 3 3 <head> 4 4 <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> 5 [% IF (node_name == 'category index' || node_name == 'locale index')%]6 <title>Index of "[% criterion.name %]" - [% site_name %]</title>5 [% IF page_title %] 6 <title>[% page_title %]</title> 7 7 [% ELSE %] 8 <title>[% node_name %] - [% site_name %]</title>8 <title>[% node_name %] - [% site_name %]</title> 9 9 [% END %] 10 10 [% IF contact_email %] -
trunk/templates/site_index.tt
r288 r393 1 [% INCLUDE header.tt %]1 [% INCLUDE header.tt page_title = "Index of $criterion.name - $site_name" %] 2 2 [% INCLUDE banner.tt %] 3 3 <div id="content"> -
trunk/wiki.cgi
r392 r393 77 77 my @nodes = $wiki->list_all_nodes(); 78 78 $node = $nodes[int(rand(scalar(@nodes) + 1)) + 1]; 79 $guide->redirect_to_node($node);79 print $guide->redirect_to_node($node); 80 80 exit 0; 81 81 } elsif ($action eq 'find_within_distance') { … … 330 330 331 331 if ($written) { 332 $guide->redirect_to_node($node);332 print $guide->redirect_to_node($node); 333 333 } else { 334 334 my %node_data = $wiki->retrieve_node($node);
