SAFEWRAP test was not good

modules/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Simple.pm

@@ -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

modules/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Vhost.pm

@@ -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';
 

modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Menu.pm

@@ -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
 

modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/_SOAP.pm

@@ -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';