From c8aab130e99b4fcb5ff9608bbdd867e22f305450 Mon Sep 17 00:00:00 2001 From: "J.D. Smith" Date: Mon, 27 Nov 2006 18:08:51 +0000 Subject: [PATCH] (hs-already-hidden-p): Move to end of line so hidden blocks will be correctly identified. --- lisp/ChangeLog | 5 +++++ lisp/progmodes/hideshow.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0e3266cdeec..3067bf36cf9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-11-27 J.D. Smith + + * progmodes/hideshow.el (hs-already-hidden-p): Move to end of + line so hidden blocks will be correctly identified. + 2006-11-27 Juanma Barranquero * 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." (if (and c-reg (nth 0 c-reg)) ;; point is inside a comment, and that comment is hidable (goto-char (nth 0 c-reg)) + (end-of-line) (when (and (not c-reg) (hs-find-block-beginning) (looking-at hs-block-start-regexp)) -- 2.39.2