aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/hideshow.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el
index 4842d06d5fa..0b932e06313 100644
--- a/lisp/progmodes/hideshow.el
+++ b/lisp/progmodes/hideshow.el
@@ -77,7 +77,7 @@
77 77
78(defvar hs-unbalance-handler-method 'top-level 78(defvar hs-unbalance-handler-method 'top-level
79 "*Symbol representing how \"unbalanced parentheses\" should be handled. 79 "*Symbol representing how \"unbalanced parentheses\" should be handled.
80This error is usually signalled by hs-show-block. One of four values: 80This error is usually signaled by hs-show-block. One of four values:
81`top-level', `next-line', `signal' or `ignore'. Default is `top-level'. 81`top-level', `next-line', `signal' or `ignore'. Default is `top-level'.
82 82
83- `top-level' -- Show top-level block containing the currently troublesome 83- `top-level' -- Show top-level block containing the currently troublesome
@@ -345,7 +345,7 @@ hs-hide-hooks is called. See documentation for `run-hooks'."
345 (cond ((string= comment-end "") 345 (cond ((string= comment-end "")
346 (message "can't hide a single-line comment")) 346 (message "can't hide a single-line comment"))
347 ((< (count-lines (car c-reg) (nth 1 c-reg)) 2) 347 ((< (count-lines (car c-reg) (nth 1 c-reg)) 2)
348 (message "not enougn comment lines to hide")) 348 (message "not enough comment lines to hide"))
349 (t 349 (t
350 (goto-char (nth 1 c-reg)) 350 (goto-char (nth 1 c-reg))
351 (forward-line -1) 351 (forward-line -1)
@@ -363,7 +363,7 @@ hs-hide-hooks is called. See documentation for `run-hooks'."
363(defun hs-show-block (&optional end) 363(defun hs-show-block (&optional end)
364 "Selects a block and shows it. With prefix arg, reposition at end. 364 "Selects a block and shows it. With prefix arg, reposition at end.
365Upon completion, point is repositioned hs-show-hooks are called. See 365Upon completion, point is repositioned hs-show-hooks are called. See
366documetation for `hs-hide-block' and `run-hooks'." 366documentation for `hs-hide-block' and `run-hooks'."
367 (interactive "P") 367 (interactive "P")
368 (hs-life-goes-on 368 (hs-life-goes-on
369 (let ((c-reg (hs-inside-comment-p))) 369 (let ((c-reg (hs-inside-comment-p)))