adding some package check
This commit is contained in:
parent
467befee67
commit
e08fe2db37
|
|
@ -904,16 +904,18 @@ sub checkperlmodules {
|
|||
}
|
||||
}
|
||||
unless (eval {require LWP::Simple}) {
|
||||
showmessage(getmessage('LWP::Simple'), 'PressEnter', '', 1);
|
||||
if ($#missing>=0) { # see above note
|
||||
push @missing, "LWP::Simple";
|
||||
}
|
||||
}
|
||||
unless (eval {require XML::Simple}) {
|
||||
showmessage(getmessage('XML::Simple'), 'PressEnter', '', 1);
|
||||
if ($#missing>=0) { # see above note
|
||||
push @missing, "XML::Simple";
|
||||
}
|
||||
unless (eval {require Date::Calc}) {
|
||||
if ($#missing>=0) { # see above note
|
||||
push @missing, "Date::Calc";
|
||||
}
|
||||
}
|
||||
|
||||
#
|
||||
|
|
|
|||
Loading…
Reference in New Issue