Changeset 393 for trunk/t/53_show_index.t
- Timestamp:
- 06/12/04 17:15:14 (5 years ago)
- Files:
-
- 1 modified
-
trunk/t/53_show_index.t (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
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",
