From 0393cd2f721f8e44b4cef3b0864f1b4903ab9ba3 Mon Sep 17 00:00:00 2001 From: Michael Heerdegen Date: Fri, 2 Aug 2019 21:04:22 +0200 Subject: [PATCH] Fix example code in hideshow.el * lisp/progmodes/hideshow.el: The original example would infloop (bug#19892). --- lisp/progmodes/hideshow.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index 1d62bb58750..4cfcd3d09a3 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el @@ -97,7 +97,8 @@ ;; nested level in addition to the top-level: ;; ;; (defun ttn-hs-hide-level-1 () -;; (hs-hide-level 1) +;; (when (hs-looking-at-block-start-p) +;; (hs-hide-level 1)) ;; (forward-sexp 1)) ;; (setq hs-hide-all-non-comment-function 'ttn-hs-hide-level-1) ;; -- 2.39.2