|
@ -862,6 +862,7 @@ sub checkperlmodules { |
|
|
unless (eval {require Digest::MD5}) { push @missing,"Digest::MD5" }; |
|
|
unless (eval {require Digest::MD5}) { push @missing,"Digest::MD5" }; |
|
|
unless (eval {require MARC::Record}) { push @missing,"MARC::Record" }; |
|
|
unless (eval {require MARC::Record}) { push @missing,"MARC::Record" }; |
|
|
unless (eval {require Mail::Sendmail}) { push @missing,"Mail::Sendmail" }; |
|
|
unless (eval {require Mail::Sendmail}) { push @missing,"Mail::Sendmail" }; |
|
|
|
|
|
unless (eval {require Net::LDAP}) { push @missing,"Net::LDAP" }; |
|
|
unless (eval {require Event}) { |
|
|
unless (eval {require Event}) { |
|
|
if ($#missing>=0) { # only when $#missing >= 0 so this isn't fatal |
|
|
if ($#missing>=0) { # only when $#missing >= 0 so this isn't fatal |
|
|
push @missing, "Event"; |
|
|
push @missing, "Event"; |
|
|