+sub canremove ($$$) {
+ my ($page, $cgi, $session) = (shift, shift, shift);
+
+ if (istranslation($page)) {
+ return gettext("Can not remove a translation. Removing the master page,".
+ "though, removes its translations as well.");
+ }
+ return undef;
+}
+