From: David Baird <cpan.zerofive@googlemail.com>
Date: Tue, 11 Oct 2005 21:32:22 +0000 (+0000)
Subject: Removed __to_boolean()
X-Git-Tag: 2.11~121
X-Git-Url: https://git.decadent.org.uk/gitweb/?a=commitdiff_plain;h=01eab49507a01b9b6135ca1fdd085094373cd78f;p=maypole.git

Removed __to_boolean()

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@397 48953598-375a-da11-a14b-00016c27c3ee
---

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) = @_;