diff options
| author | Dan McGee <dan@archlinux.org> | 2011-07-27 19:44:17 +0200 |
|---|---|---|
| committer | Dan McGee <dan@archlinux.org> | 2011-07-27 19:44:17 +0200 |
| commit | 06974ebf2f6674baf01da79be9658277cbf2650e (patch) | |
| tree | 91e3be931c90ca1cc772a928a3e5bcf70a7f5a3d /contrib | |
| parent | 98073afe5527aa8a08c7119b61d0251250168e82 (diff) | |
| download | pacman-06974ebf2f6674baf01da79be9658277cbf2650e.tar.gz pacman-06974ebf2f6674baf01da79be9658277cbf2650e.tar.xz | |
contrib/pacsearch: skip non-matching lines
This prevents some perl errors from popping up when pacman prints error
or warning messages.
Signed-off-by: Dan McGee <dan@archlinux.org>
Diffstat (limited to 'contrib')
| -rwxr-xr-x | contrib/pacsearch.in | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/contrib/pacsearch.in b/contrib/pacsearch.in index dd848a73..db9d6ad1 100755 --- a/contrib/pacsearch.in +++ b/contrib/pacsearch.in @@ -111,6 +111,8 @@ if ($#querypkgs >= 0) { foreach $_ (@querypkgs) { # we grab 4 fields here: repo, name/ver, installed, and desc my @pkgfields = /^(.*?)\/(.*?) ?(\[.*\])?\n(.*)$/s; + # skip any non-matching line + next if not defined $pkgfields[1]; # since installed is optional, we should fill it in if necessary $pkgfields[2] = "" if not defined $pkgfields[2]; # check if the package was listed in the sync out |