r9821 - /trunk/libxml-sax-perl/debian/libxml-sax-perl.postinst

[ntyni-guest at users.alioth.debian.org]

Author: ntyni-guest
Date: Tue Nov 27 18:57:54 2007
New Revision: 9821

URL: http://svn.debian.org/wsvn/?sc=1&rev=9821
Log:
improve postinst comments and change the priority downgrading method

Modified:
    trunk/libxml-sax-perl/debian/libxml-sax-perl.postinst

Modified: trunk/libxml-sax-perl/debian/libxml-sax-perl.postinst
URL: http://svn.debian.org/wsvn/trunk/libxml-sax-perl/debian/libxml-sax-perl.postinst?rev=9821&op=diff
==============================================================================
--- trunk/libxml-sax-perl/debian/libxml-sax-perl.postinst (original)
+++ trunk/libxml-sax-perl/debian/libxml-sax-perl.postinst Tue Nov 27 18:57:54 2007
@@ -16,14 +16,19 @@
 
     if [ -n "$2" ] && dpkg --compare-versions "$2" le 0.16-0.1
     then
-        rm -f /etc/perl/XML/SAX/ParserDetails.d/XML::SAX::PurePerl
+        # first, move /etc/perl/XML/SAX/ParserDetails.d/ under 
+        #             /var/lib/libxml-sax-perl
         for i in /etc/perl/XML/SAX/ParserDetails.d/*
         do
-            # the first part handles an empty directory ('*' is not expanded)
+            # the directory should never be empty, but the [ ! -e ]
+            # construct handles an unexpanded glob just in case
             [ ! -e "$i" ] || \
             mv "$i" "/var/lib/libxml-sax-perl/ParserDetails.d/50-$(basename $i)"
         done
         rmdir --ignore-fail-on-non-empty /etc/perl/XML/SAX/ParserDetails.d
+
+        # now downgrade XML::SAX::PurePerl priority by removing it first
+        update-perl-sax-parsers --quiet --remove XML::SAX::PurePerl
     fi
 
     update-perl-sax-parsers --quiet --add XML::SAX::PurePerl --priority 10