add some openid matching tests
parent
e091fab0e7
commit
6f3641f16c
|
@ -1,7 +1,7 @@
|
||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
use warnings;
|
use warnings;
|
||||||
use strict;
|
use strict;
|
||||||
use Test::More tests => 70;
|
use Test::More tests => 72;
|
||||||
|
|
||||||
BEGIN { use_ok("IkiWiki"); }
|
BEGIN { use_ok("IkiWiki"); }
|
||||||
|
|
||||||
|
@ -46,6 +46,8 @@ ok(! pagespec_match("somepage", "user(frodo)", user => "Sam"));
|
||||||
ok(pagespec_match("somepage", "user(*o)", user => "Bilbo"));
|
ok(pagespec_match("somepage", "user(*o)", user => "Bilbo"));
|
||||||
ok(pagespec_match("somepage", "user(*o)", user => "frodo"));
|
ok(pagespec_match("somepage", "user(*o)", user => "frodo"));
|
||||||
ok(! pagespec_match("somepage", "user(*o)", user => "Sam"));
|
ok(! pagespec_match("somepage", "user(*o)", user => "Sam"));
|
||||||
|
ok(pagespec_match("somepage", "user(http://*.myopenid.com/)", user => "http://foo.myopenid.com/"));
|
||||||
|
ok(pagespec_match("somepage", "user(*://*)", user => "http://foo.myopenid.com/"));
|
||||||
|
|
||||||
# The link and backlink stuff needs this.
|
# The link and backlink stuff needs this.
|
||||||
$config{userdir}="";
|
$config{userdir}="";
|
||||||
|
|
Loading…
Reference in New Issue