From d11fb5906b19d7cf858b3803f37c6ff5dd8dc471 Mon Sep 17 00:00:00 2001 From: acli Date: Tue, 4 Feb 2003 06:22:19 +0000 Subject: [PATCH] Check for Mail::Sendmail, for opac/opac-userupdate.pl (Bug 105) --- misc/Install.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/misc/Install.pm b/misc/Install.pm index 04c47c4b4d..7c46dc7a23 100644 --- a/misc/Install.pm +++ b/misc/Install.pm @@ -633,6 +633,7 @@ sub checkperlmodules { unless (eval {require Set::Scalar}) { push @missing,"Set::Scalar" }; unless (eval {require Digest::MD5}) { push @missing,"Digest::MD5" }; unless (eval {require MARC::Record}) { push @missing,"MARC::Record" }; + unless (eval {require Mail::Sendmail}) { push @missing,"Mail::Sendmail" }; unless (eval {require Net::Z3950}) { showmessage(getmessage('NETZ3950Missing'), 'PressEnter', '', 1); if ($#missing>=0) { # XXX why only when $#missing >= 0? -- 2.39.5