Mercurial > pkg

diff src/pkg-examine.pl @ 29:819e950ac8cc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor changes.
author Robert McIntyre <rlm@mit.edu>
date Thu, 10 Jan 2013 16:59:50 +0000
parents dd480255bd82
children
line wrap: on
line diff
     1.1 --- a/src/pkg-examine.pl	Thu Jan 10 16:28:18 2013 +0000
     1.2 +++ b/src/pkg-examine.pl	Thu Jan 10 16:59:50 2013 +0000
     1.3 @@ -17,9 +17,10 @@
     1.4  $pkg_name = $ARGV[0];
     1.5  
     1.6  `id -g $pkg_name 2>/dev/null`;
     1.7 -if ($?){
     1.8 -  print "No group named $pkg_name.";
     1.9 -  exit 0;}
    1.10 +if (($pkg_name eq "") || $?){
    1.11 +    print "No group named $pkg_name.\n";
    1.12 +    exit 0;
    1.13 +}
    1.14  
    1.15  @files = split(/\0/, `find /usr /opt /etc -group $pkg_name -print0`);
    1.16