From: cebka@lenovo-laptop <cebka@lenovo-laptop>
Date: Fri, 12 Mar 2010 17:55:09 +0000 (+0300)
Subject: * use -> require
X-Git-Tag: 0.3.0~68
X-Git-Url: https://source.dussan.org/?a=commitdiff_plain;h=beac9f2f7609c592758427f833466caabe8c4b71;p=rspamd.git

* use -> require
---

diff --git a/perl/lib/Mail/Rspamd/Client.pm b/perl/lib/Mail/Rspamd/Client.pm
index 7a94e6e7b..be4fa754c 100644
--- a/perl/lib/Mail/Rspamd/Client.pm
+++ b/perl/lib/Mail/Rspamd/Client.pm
@@ -123,8 +123,8 @@ sub make_ssl_socket {
 	my ($host, $port) = @_; 
 	
 	eval {
-		use IO::Socket::SSL;
-	} or $self->{error} = "IO::Socket::SSL required for imaps";
+		require IO::Socket::SSL;
+	} or$self->{error} = "IO::Socket::SSL required for imaps";
 
 	return IO::Socket::SSL->new("$host:$port");
 }
@@ -1196,7 +1196,7 @@ sub process_imap {
 
 	if (!$password) {
 		eval {
-			use Term::ReadKey;
+			require Term::ReadKey;
 			$self->{error} = "Enter IMAP password: ";
 			ReadMode 'noecho';
 			$password = ReadLine 0;