From 01eab49507a01b9b6135ca1fdd085094373cd78f Mon Sep 17 00:00:00 2001 From: David Baird Date: Tue, 11 Oct 2005 21:32:22 +0000 Subject: [PATCH] Removed __to_boolean() git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@397 48953598-375a-da11-a14b-00016c27c3ee --- lib/Maypole.pm | 3 --- 1 file changed, 3 deletions(-) diff --git a/lib/Maypole.pm b/lib/Maypole.pm index 36f0858..bec9675 100644 --- a/lib/Maypole.pm +++ b/lib/Maypole.pm @@ -284,9 +284,6 @@ sub is_model_applicable return 0; } -# *only* intended for translating the return code from is_applicable() -sub __to_boolean { $_[0] == OK ? 1 : 0 } - sub call_authenticate { my ($self) = @_; -- 2.39.5