r9707 - /scripts/qa/DebianQA/DebVersions.pm

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Sat Nov 24 05:12:07 UTC 2007


Author: tincho-guest
Date: Sat Nov 24 05:12:07 2007
New Revision: 9707

URL: http://svn.debian.org/wsvn/?sc=1&rev=9707
Log:
Correctly handle versions which aren't true values ("0").

Modified:
    scripts/qa/DebianQA/DebVersions.pm

Modified: scripts/qa/DebianQA/DebVersions.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/DebVersions.pm?rev=9707&op=diff
==============================================================================
--- scripts/qa/DebianQA/DebVersions.pm (original)
+++ scripts/qa/DebianQA/DebVersions.pm Sat Nov 24 05:12:07 2007
@@ -18,7 +18,7 @@
 
 sub deb_parse($) {
     my $v = shift;
-    unless($v) {
+    unless(defined $v) {
         carp "Empty debian package version passed";
         return ();
     }




More information about the Pkg-perl-cvs-commits mailing list