diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2011-04-22 20:44:26 +0200 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2011-04-22 20:44:26 +0200 |
| commit | e02f48d76bfd57f014ffbe3ba56b62f2d5ccc794 (patch) | |
| tree | d27a2d9fd6838d6e619c824deb12a568ceac54f6 /lisp/progmodes/hideshow.el | |
| parent | 7ede3b6577ae99a3e7ac45baa7cace439bf5070c (diff) | |
| download | emacs-e02f48d76bfd57f014ffbe3ba56b62f2d5ccc794.tar.gz | |
lisp/progmodes/*.el: Lexical-binding cleanup.
Diffstat (limited to 'lisp/progmodes/hideshow.el')
| -rw-r--r-- | lisp/progmodes/hideshow.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index 9468d7b463e..d07edd5de2f 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el @@ -565,10 +565,9 @@ and then further adjusted to be at the end of the line." (if comment-reg (hs-hide-comment-region (car comment-reg) (cadr comment-reg) end) (when (looking-at hs-block-start-regexp) - (let* ((mdata (match-data t)) - (header-beg (match-beginning 0)) - (header-end (match-end 0)) - p q ov) + (let ((mdata (match-data t)) + (header-end (match-end 0)) + p q ov) ;; `p' is the point at the end of the block beginning, which ;; may need to be adjusted (save-excursion |