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

Fixes: debbugs:11951

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d37b054e9d04f52aa99632058631b28a7cc4b550..6122c0b0f8d000713786118cd2bf07f9c88b45f3 100644 (file)
--- 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 3e3d7adc0b62d1c2c5384cb6719045321612647f..4b77c6dab1ae62a61879646bcf1a581606175447 100644 (file)
--- 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'."