chiark / gitweb /
*** empty log message ***
authorian <ian>
Sun, 13 Jul 2003 22:57:25 +0000 (22:57 +0000)
committerian <ian>
Sun, 13 Jul 2003 22:57:25 +0000 (22:57 +0000)
changelog
groupmanage/groupmanage

index 774706f..b727696 100644 (file)
--- a/changelog
+++ b/changelog
@@ -4,6 +4,8 @@ userv-utils (0.2.99.0.2) unstable; urgency=low
   * new Makefiles in various directories, still all a bit crap
   * removed some common stuff from */Makefile to settings.make
   * copyright notices updated
+  * groupmanage: do not claim that root doesn't exist.
+    (Thanks to report from Ben Harris.)
 
  --
 
index 7c875c6..03da3dc 100755 (executable)
@@ -17,7 +17,7 @@
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 # GNU General Public License for more details.
 #
-# $Id: groupmanage,v 1.5 2003/06/15 17:57:17 ian Exp $
+# $Id: groupmanage,v 1.6 2003/07/13 22:57:25 ian Exp $
 
 sub usage {
     &unlock;
@@ -227,7 +227,7 @@ while (@ARGV) {
     } elsif (m/^\w[-0-9A-Za-z]*$/) {
         y/\n//d;
         $chgu=$_;
-        getpwnam($chgu) || &quit("username $chgu does not exist");
+        defined(getpwnam($chgu)) || &quit("username $chgu does not exist");
         eval "\@l = \@$clist; 1" || &quit("internal error: $@");
         $already= grep($_ eq $chgu, @l);
         if ($action eq 'add') {