From f88f11b4f805a70c9748bc3676cb1ce086db2ce8 Mon Sep 17 00:00:00 2001 From: Paul Poulain Date: Tue, 2 Oct 2012 16:55:32 +0200 Subject: [PATCH] Bug 7963 follow-up: die nicely if AnyEvent libraries not installed MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Signed-off-by: Frédéric Demians Signed-off-by: Paul Poulain --- misc/cronjobs/check-url-quick.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/misc/cronjobs/check-url-quick.pl b/misc/cronjobs/check-url-quick.pl index 632a1fe87b..d1674e8d34 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; -use AnyEvent; -use AnyEvent::HTTP; +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" ; my ( $verbose, $help, $html ) = ( 0, 0, 0 ); my ( $host, $host_intranet ) = ( '', '' ); -- 2.39.5