test that nadmin.pl/modules works

[bse.git] / t / t00smoke.t

diff --git a/t/t00smoke.t b/t/t00smoke.t
index 2df4c02ce6d2640422167d7b1335fdbf3d4a6a6a..8f626041cb9e07bd1f2c53cd723aef681a6fa907 100644 (file)
--- a/t/t00smoke.t
+++ b/t/t00smoke.t
@@ -1,6 +1,6 @@
 #!perl -w
 use strict;
-use Test::More tests => 62;
+use Test::More tests => 63;
 use BSE::Test qw(make_ua fetch_ok base_url base_securl config);
 
 ++$|;
@@ -73,3 +73,5 @@ fetch_ok($ua, 'fmail', "$baseurl/cgi-bin/fmail.pl",
         qr!name="form"!);
 fetch_ok($ua, 'page.pl?page=1', "$baseurl/cgi-bin/page.pl?page=1",
         qr!welcome\s+to\s!i);
+fetch_ok($ua, 'nadmin.pl/modules', "$baseurl/cgi-bin/admin/nadmin.pl/modules".
+       qr/BSE\s+Modules/);