Bug 7963 follow-up: die nicely if AnyEvent libraries not installed

Signed-off-by: Frédéric Demians <f.demians@tamil.fr>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>

diff --git a/misc/cronjobs/check-url-quick.pl b/misc/cronjobs/check-url-quick.pl
index 632a1fe..d1674e8 100755 (executable)
--- 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 ) = ( '', '' );