* dired.c (Fsystem_groups): Remove unused local.

diff --git a/src/ChangeLog b/src/ChangeLog
index 8c0dcc9c0442492d8a3aa67a26dcf003094cb015..2e3142b70150e0208273dfbac346fae32f26e602 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2012-04-17  Paul Eggert  <eggert@cs.ucla.edu>
+
+       * dired.c (Fsystem_groups): Remove unused local.
+
 2012-04-17  Glenn Morris  <rgm@gnu.org>
 
        * dired.c (Fsystem_users): Doc fix.

diff --git a/src/dired.c b/src/dired.c
index eeae59d280133eb459a5eb1d48c984560ae54b12..367bcb4031d63031d67269e85b715b79a5e57626 100644 (file)
--- a/src/dired.c
+++ b/src/dired.c
@@ -1023,7 +1023,7 @@ return a list with one element, taken from `user-real-login-name'.  */)
      (void)
 {
   Lisp_Object users = Qnil;
-#if defined(HAVE_GETPWENT) && defined(HAVE_ENDPWENT)
+#if defined HAVE_GETPWENT && defined HAVE_ENDPWENT
   struct passwd *pw;
 
   while ((pw = getpwent ()))
@@ -1043,9 +1043,8 @@ The value may be nil if not supported on this platform.  */)
      (void)
 {
   Lisp_Object groups = Qnil;
-#if defined(HAVE_GETGRENT) && defined(HAVE_ENDGRENT)
+#if defined HAVE_GETGRENT && defined HAVE_ENDGRENT
   struct group *gr;
-  int length;
 
   while ((gr = getgrent ()))
     groups = Fcons (DECODE_SYSTEM (build_string (gr->gr_name)), groups);