From 7ddafb955f27764cbd108c4b3f225f57d917e880 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Wed, 5 Jan 2000 12:34:51 +0000 Subject: [PATCH] Fix buglet in local variables initialization. --- lisp/ChangeLog | 2 ++ lisp/progmodes/hideshow.el | 3 ++- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 049b8f15e75..1cff815b412 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,8 @@ * progmodes/hideshow.el (hs-discard-overlays, hs-flag-region, hs-show-block): Don't use `mapcar' when not accumulating. + Fix buglet in local variables initialization. + 2000-01-05 Andreas Schwab * hscroll.el (hscroll): Doc fix. diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index 6de24ce4cbf..879e14876ed 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el @@ -877,7 +877,8 @@ Key bindings: (while vars (let ((var (car vars))) (make-variable-buffer-local var) - (put var 'permanent-local t)))) + (put var 'permanent-local t)) + (setq vars (cdr vars)))) ;;--------------------------------------------------------------------------- ;; that's it -- 2.11.4.GIT