mirror of
https://github.com/pandorafms/pandorafms.git
synced 2025-07-31 01:35:36 +02:00
Ondemand based on environment XML parser
This commit is contained in:
parent
f97429fb46
commit
380574b863
@ -130,7 +130,16 @@ use Text::ParseWords;
|
|||||||
# due a bug processing some XML with blank spaces.
|
# due a bug processing some XML with blank spaces.
|
||||||
# See http://www.perlmonks.org/?node_id=706838
|
# See http://www.perlmonks.org/?node_id=706838
|
||||||
|
|
||||||
$XML::Simple::PREFERRED_PARSER='XML::SAX::ExpatXS';
|
eval {
|
||||||
|
local $SIG{__DIE__};
|
||||||
|
eval "use XML::SAX::ExpatXS;1" or die "XML::SAX::ExpatXS not available";
|
||||||
|
};
|
||||||
|
if (!$@) {
|
||||||
|
# Force best option available.
|
||||||
|
$XML::Simple::PREFERRED_PARSER='XML::SAX::ExpatXS';
|
||||||
|
} else {
|
||||||
|
# Let ParserDetails.ini command parser.
|
||||||
|
}
|
||||||
|
|
||||||
# Default lib dir for RPM and DEB packages
|
# Default lib dir for RPM and DEB packages
|
||||||
use lib '/usr/lib/perl5';
|
use lib '/usr/lib/perl5';
|
||||||
|
Loading…
x
Reference in New Issue
Block a user