Change import of Net::LDAP to work on squeeze

diff --git a/Util.pm b/Util.pm
index 374a592..b48f6dc 100644 (file)
--- a/Util.pm
+++ b/Util.pm
@@ -7,7 +7,7 @@ package Util;
 
 use strict;
 use Date::Manip qw(ParseDate);
-use Net::LDAP qw(:all);
+use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
 use English;
 
 my $blocksize = 8; # A blowfish block is 8 bytes

diff --git a/debian/changelog b/debian/changelog
index 9c0cdb1..044df9e 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+userdir-ldap-cgi (0.3.3x) xnstable; urgency=low
+
+  * Change import of Net::LDAP to work on squeeze.
+
+ -- Peter Palfrader <weasel@debian.org>  Thu, 09 Jun 2011 13:01:41 +0000
+
 userdir-ldap-cgi (0.3.32) unstable; urgency=low
 
   [ Luca Filipozzi ]

diff --git a/login.cgi b/login.cgi
index cfe7380..d820af2 100755 (executable)
--- a/login.cgi
+++ b/login.cgi
@@ -11,7 +11,7 @@ use CGI;
 use Util;
 use URI::Escape;
 use Crypt::Blowfish;
-use Net::LDAP qw(:all);
+use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
 
 my %config = &Util::ReadConfigFile;
 

diff --git a/logout.cgi b/logout.cgi
index 9bd6e0f..585fd69 100755 (executable)
--- a/logout.cgi
+++ b/logout.cgi
@@ -8,7 +8,7 @@ use strict vars;
 #use Apache::Registry;
 use CGI;
 use Util;
-use Net::LDAP qw(:all);
+use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
 
 my %config = &Util::ReadConfigFile;
 my $proto = ($ENV{HTTPS} ? "https" : "http");

diff --git a/machines.cgi b/machines.cgi
index 4108fff..55fe5bc 100755 (executable)
--- a/machines.cgi
+++ b/machines.cgi
@@ -11,7 +11,7 @@ use strict vars;
 #use Apache::Registry;
 use CGI;
 use Util;
-use Net::LDAP qw(:all);
+use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
 use Fcntl;
 use POSIX;
 use MIME::Base64;

diff --git a/search.cgi b/search.cgi
index dcab35b..16d00b0 100755 (executable)
--- a/search.cgi
+++ b/search.cgi
@@ -11,7 +11,7 @@ use strict vars;
 use CGI;
 use Util;
 use URI::Escape;
-use Net::LDAP qw(:all);
+use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
 
 # Global settings...
 my %config = &Util::ReadConfigFile;

diff --git a/update.cgi b/update.cgi
index 052238f..c42eddc 100755 (executable)
--- a/update.cgi
+++ b/update.cgi
@@ -13,7 +13,7 @@ use Digest::HMAC_SHA1 qw(hmac_sha1_hex);
 use Util;
 use English;
 use URI::Escape;
-use Net::LDAP qw(:all);
+use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
 
 my %config = &Util::ReadConfigFile;