archive/oddmuse
2
0
Fork 0
forked from github/kensanata.oddmuse
Code Pull Requests Activity

Reset $GoogleSearchDomain between tets.

Browse Source
This commit is contained in:
Alex Schroeder
2007-11-16 14:40:28 +00:00
parent 3dd64589ef
commit bbaefdb7d7
1 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
t/google-search.t
View File

@@ -26,22 +26,27 @@ add_module('google-search.pl');
GoogleSearchInit();
is($GoogleSearchDomain, undef, 'No $ScriptName');
$GoogleSearchDomain = undef;
$ScriptName = 'http://www.communitywiki.org/en';
GoogleSearchInit();
is($GoogleSearchDomain, 'communitywiki.org', $ScriptName);
$GoogleSearchDomain = undef;
$ScriptName = 'http://www.community.org:80/';
GoogleSearchInit();
is($GoogleSearchDomain, 'community.org', $ScriptName);
$GoogleSearchDomain = undef;
$ScriptName = 'http://www.communitywiki.org';
GoogleSearchInit();
is($GoogleSearchDomain, 'communitywiki.org', $ScriptName);
$GoogleSearchDomain = undef;
$ScriptName = 'http://emacswiki.org/cgi-bin/emacs';
GoogleSearchInit();
is($GoogleSearchDomain, 'emacswiki.org', $ScriptName);
$GoogleSearchDomain = undef;
$ScriptName = 'http://localhost/wiki.pl';
GoogleSearchInit();
isnt($GoogleSearchDomain, 'localhost', $ScriptName);