master
joey 2007-04-27 18:55:20 +00:00
parent 1eee32c5b5
commit 89260fb39a
1 changed files with 8 additions and 8 deletions

View File

@ -1011,29 +1011,29 @@ sub pagespec_match ($$;@) { #{{{
package IkiWiki::FailReason; package IkiWiki::FailReason;
use overload ( use overload ( #{{{
'""' => sub { ${$_[0]} }, '""' => sub { ${$_[0]} },
'0+' => sub { 0 }, '0+' => sub { 0 },
'!' => sub { bless $_[0], 'IkiWiki::SuccessReason'}, '!' => sub { bless $_[0], 'IkiWiki::SuccessReason'},
fallback => 1, fallback => 1,
); ); #}}}
sub new { sub new { #{{{
bless \$_[1], $_[0]; bless \$_[1], $_[0];
} } #}}}
package IkiWiki::SuccessReason; package IkiWiki::SuccessReason;
use overload ( use overload ( #{{{
'""' => sub { ${$_[0]} }, '""' => sub { ${$_[0]} },
'0+' => sub { 1 }, '0+' => sub { 1 },
'!' => sub { bless $_[0], 'IkiWiki::FailReason'}, '!' => sub { bless $_[0], 'IkiWiki::FailReason'},
fallback => 1, fallback => 1,
); ); #}}}
sub new { sub new { #{{{
bless \$_[1], $_[0]; bless \$_[1], $_[0];
} }; #}}}
package IkiWiki::PageSpec; package IkiWiki::PageSpec;