blob: 4b1a432b21d32c3948fd7bf623a7cfe79f04dff6 (
plain)
- #!/usr/bin/perl
- package IkiWiki::Plugin::opendiscussion;
- use warnings;
- use strict;
- use IkiWiki;
- sub import { #{{{
- hook(type => "canedit", id => "opendiscussion", call => \&canedit);
- } # }}}
- sub canedit ($$) { #{{{
- my $page=shift;
- my $cgi=shift;
- my $session=shift;
- my $discussion=gettext("discussion");
- return "" if $page=~/\/\Q$discussion\E$/;
- return undef;
- } #}}}
- 1
|