diff options
| author | Thien-Thi Nguyen <[email protected]> | 2000-01-05 12:34:51 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen <[email protected]> | 2000-01-05 12:34:51 +0000 |
| commit | 7ddafb955f27764cbd108c4b3f225f57d917e880 (patch) | |
| tree | abe2734a486a16a2e129fa0631fce8f6b136895b | |
| parent | 1362aeb47c7e6dd1ba12933e71ee08db0f26a47b (diff) | |
Fix buglet in local variables initialization.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/progmodes/hideshow.el | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 049b8f15e7..1cff815b41 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 <[email protected]> * hscroll.el (hscroll): Doc fix. diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index 6de24ce4cb..879e14876e 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 |