SAFEWRAP test was not good

This commit is contained in:
Clément Oudot 2010-09-16 08:44:56 +00:00
parent 30a337176e
commit b658c3df43
4 changed files with 4 additions and 4 deletions

View File

@ -21,7 +21,7 @@ use Safe;
use Lemonldap::NG::Common::Safelib; #link protected safe Safe object
require POSIX;
use CGI::Util 'expires';
use constant SAFEWRAP => ( Safe->can("wrap_code_re") ? 1 : 0 );
use constant SAFEWRAP => ( Safe->can("wrap_code_ref") ? 1 : 0 );
#inherits Cache::Cache
#inherits Apache::Session

View File

@ -8,7 +8,7 @@ package Lemonldap::NG::Handler::Vhost;
use Lemonldap::NG::Handler::Simple qw(:locationRules :headers); #inherits
use strict;
use MIME::Base64;
use constant SAFEWRAP => ( Safe->can("wrap_code_re") ? 1 : 0 );
use constant SAFEWRAP => ( Safe->can("wrap_code_ref") ? 1 : 0 );
our $VERSION = '0.55';

View File

@ -11,7 +11,7 @@ require Lemonldap::NG::Common::CGI;
use Lemonldap::NG::Portal::SharedConf;
use Lemonldap::NG::Common::Safelib; #link protected safe Safe object
use Safe;
use constant SAFEWRAP => ( Safe->can("wrap_code_re") ? 1 : 0 );
use constant SAFEWRAP => ( Safe->can("wrap_code_ref") ? 1 : 0 );
#inherits Net::LDAP::Control::PasswordPolicy

View File

@ -9,7 +9,7 @@ use strict;
use Lemonldap::NG::Portal::Simple;
require SOAP::Lite;
use Safe;
use constant SAFEWRAP => ( Safe->can("wrap_code_re") ? 1 : 0 );
use constant SAFEWRAP => ( Safe->can("wrap_code_ref") ? 1 : 0 );
our $VERSION = '0.2';