diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/progmodes/hideshow.el | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0e3266cdeec..3067bf36cf9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2006-11-27 J.D. Smith <jdsmith@as.arizona.edu> | ||
| 2 | |||
| 3 | * progmodes/hideshow.el (hs-already-hidden-p): Move to end of | ||
| 4 | line so hidden blocks will be correctly identified. | ||
| 5 | |||
| 1 | 2006-11-27 Juanma Barranquero <lekktu@gmail.com> | 6 | 2006-11-27 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 7 | ||
| 3 | * ledit.el (ledit-save-defun, ledit-mode): | 8 | * ledit.el (ledit-save-defun, ledit-mode): |
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index e7ed67ce61c..e50a9a4dda6 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el | |||
| @@ -706,6 +706,7 @@ and `case-fold-search' are both t." | |||
| 706 | (if (and c-reg (nth 0 c-reg)) | 706 | (if (and c-reg (nth 0 c-reg)) |
| 707 | ;; point is inside a comment, and that comment is hidable | 707 | ;; point is inside a comment, and that comment is hidable |
| 708 | (goto-char (nth 0 c-reg)) | 708 | (goto-char (nth 0 c-reg)) |
| 709 | (end-of-line) | ||
| 709 | (when (and (not c-reg) | 710 | (when (and (not c-reg) |
| 710 | (hs-find-block-beginning) | 711 | (hs-find-block-beginning) |
| 711 | (looking-at hs-block-start-regexp)) | 712 | (looking-at hs-block-start-regexp)) |