7 lines
148 B
Text
7 lines
148 B
Text
|
#!/usr/bin/perl
|
||
|
|
if('DEINSTALL' eq $ARGV[1]) {
|
||
|
|
eval "use XML::SAX;";
|
||
|
|
die $@ if $@;
|
||
|
|
XML::SAX->remove_parser(q(XML::SAX::Expat))->save_parsers();
|
||
|
|
}
|