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