* lisp/progmodes/hideif.el (hif-compress-define-list): Fix typo. (tiny change)

Fixes: debbugs:11951

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d37b054e9d0..6122c0b0f8d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-08-22  Jeremy Moore  <jmoore@ieee.org>  (tiny change)
+
+        * progmodes/hideif.el (hif-compress-define-list):
+        Fix typo.  (Bug#11951)
+
 2012-08-20  Dan Nicolaescu  <dann@gnu.org>
 
         * progmodes/hideshow.el (hs-block-end-regexp): Restore lost
diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el
index 3e3d7adc0b6..4b77c6dab1a 100644
--- a/lisp/progmodes/hideif.el
+++ b/lisp/progmodes/hideif.el
@@ -1003,7 +1003,7 @@ Return as (TOP . BOTTOM) the extent of ifdef block."
   "Compress the define list ENV into a list of defined symbols only."
   (let ((new-defs nil))
     (dolist (def env new-defs)
-      (if (hif-lookup (car def)) (push (car env) new-defs)))))
+      (if (hif-lookup (car def)) (push (car def) new-defs)))))
 
 (defun hide-ifdef-set-define-alist (name)
   "Set the association for NAME to `hide-ifdef-env'."