--- trunk/examples/webgui.pl 2004/11/16 15:34:25 36 +++ trunk/examples/webgui.pl 2004/11/23 23:49:24 45 @@ -182,8 +182,8 @@ my $dsn = $config->param('dsn'); my $db; -if ($dsn =~ m/DBI:(mysql|pg):/) { - $db = $1; +if ($dsn =~ m/DBI:(mysql|pg):/i) { + $db = lc($1); } else { print STDERR "can't find supported database (mysql/pg) in dsn: $dsn\n"; exit 1; @@ -210,6 +210,11 @@ }, }); +if (! $mnt) { + print STDERR "can't mount filesystem!"; + exit 1; +} + print "Press enter to exit..."; my $foo = ;