diff options
author | Francois Pons <fpons@mandriva.com> | 2000-04-03 13:12:27 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2000-04-03 13:12:27 +0000 |
commit | 08f4b5bf2f57dc0d75dcde2cec410a16e1f65f20 (patch) | |
tree | 4c0722403913607174297895c3f18eb41d89e03a /tools | |
parent | 12cc4c15aec4344f61f13f856dffffd5a9de0b87 (diff) | |
download | drakx-08f4b5bf2f57dc0d75dcde2cec410a16e1f65f20.tar drakx-08f4b5bf2f57dc0d75dcde2cec410a16e1f65f20.tar.gz drakx-08f4b5bf2f57dc0d75dcde2cec410a16e1f65f20.tar.bz2 drakx-08f4b5bf2f57dc0d75dcde2cec410a16e1f65f20.tar.xz drakx-08f4b5bf2f57dc0d75dcde2cec410a16e1f65f20.zip |
*** empty log message ***
Diffstat (limited to 'tools')
-rwxr-xr-x | tools/syncrpms | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/syncrpms b/tools/syncrpms index 0befdd6cc..2073b6e84 100755 --- a/tools/syncrpms +++ b/tools/syncrpms @@ -28,7 +28,7 @@ sub version_compare { my ($a, $b) = @_; local $_; - while ($a && $b) { + while ($a || $b) { my ($sb, $sa) = map { $1 if $a =~ /^\W*\d/ ? s/^\W*0*(\d+)// : s/^\W*(\D+)// } ($b, $a); $_ = length($sa) cmp length($sb) || $sa cmp $sb and return $_; } |