From 5bf527dff479e6bb1aee23b152d9c674ef7f38f7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Demians?= Date: Fri, 1 Nov 2013 10:39:23 +0100 Subject: [PATCH] Bug 11185 check-url-quick.pl fails Revert commit f88f11b4f805a70c9748bc3676cb1ce086db2ce8 --- misc/cronjobs/check-url-quick.pl | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/misc/cronjobs/check-url-quick.pl b/misc/cronjobs/check-url-quick.pl index d1674e8..632a1fe 100755 --- a/misc/cronjobs/check-url-quick.pl +++ b/misc/cronjobs/check-url-quick.pl @@ -22,8 +22,8 @@ use Pod::Usage; use Getopt::Long; use C4::Context; use C4::Biblio; -eval { require AnyEvent } or die "This script requires AnyEvent perl library. Use check-url.pl if you can't install AnyEvent" ; -eval { require AnyEvent::HTTP } or die "This script requires AnyEvent::HTTP perl library. Use check-url.pl if you can't install AnyEvent::HTTP" ; +use AnyEvent; +use AnyEvent::HTTP; my ( $verbose, $help, $html ) = ( 0, 0, 0 ); my ( $host, $host_intranet ) = ( '', '' ); -- 1.7.2.5