X-Git-Url: https://git.rmz.io/dotfiles.git/blobdiff_plain/61d7dd11d4a450a64f2817ee4db0ec7fa5880b42..d4b51f09d83f75a663c5711af77e0e6da40764a9:/bin/lib32-diff

diff --git a/bin/lib32-diff b/bin/lib32-diff
index 92305a3..ccec259 100755
--- a/bin/lib32-diff
+++ b/bin/lib32-diff
@@ -2,7 +2,7 @@
 use warnings;
 use strict;
 
-my @lib32_pkgs = `pacman -Sl lib32-testing lib32`;
+my @lib32_pkgs = `pacman -Sl testing lib32`;
 my %lib32;
 
 foreach (@lib32_pkgs) {
@@ -15,7 +15,7 @@ foreach (@lib32_pkgs) {
     my $lib32_pkgrel = $+{lib32_pkgrel};
 
     next if exists $lib32{$lib32_pkgname};
-    $lib32{$lib32_pkgname}="";
+    $lib32{$lib32_pkgname}=$lib32_repo;
 
     next if $lib32_pkgname !~ /lib32-/;
 
@@ -23,16 +23,16 @@ foreach (@lib32_pkgs) {
     my $pkgname = $lib32_pkgname;
     $pkgname =~ s/lib32-//;
 
-    my $pkg = `pacman -Ss "^$pkgname\$" | grep -v '^ ' | head -n1`;
+    my $pkg = `pacman -Ss '^$pkgname\$' | grep "/$pkgname " | head -n1`;
     chomp $pkg;
 
-    next if ( $pkg !~ /(?<repo>.+)\/(?<pkgname>.+) (?<pkgver>.+)-(?<pkgrel>\d+)/ );
+    next if ( $pkg !~ /(?<repo>.+)\/(?<pkgname>\S+) (?<pkgver>[^-]+)-(?<pkgrel>\d+)/ );
 
     my $repo = $+{repo};
     my $pkgver = $+{pkgver};
     my $pkgrel = $+{pkgrel};
 
-    if ("$lib32_pkgver-$lib32_pkgrel" lt "$pkgver-$pkgrel") {
-        print "$lib32_repo/$lib32_pkgname is older than $repo/$pkgname\n";
+    if ("$lib32_pkgver" lt "$pkgver") {
+        print "$lib32_repo/$lib32_pkgname $lib32_pkgver is older than $repo/$pkgname $pkgver\n";
     }
 }