emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org c4de06ce10 1/2: lisp/org.el: Mention how to widen i


From: ELPA Syncer
Subject: [elpa] externals/org c4de06ce10 1/2: lisp/org.el: Mention how to widen in docstrings of commands that do narrowing
Date: Mon, 5 Dec 2022 06:57:52 -0500 (EST)

branch: externals/org
commit c4de06ce1056a536edb643d5e85b29204947b321
Author: Yuval Langer <yuvallangerontheroad@proton.me>
Commit: Ihor Radchenko <yantar92@posteo.net>

    lisp/org.el: Mention how to widen in docstrings of commands that do 
narrowing
    
    lisp/org.el: (org-narrow-to-subtree, org-toggle-narrow-to-subtree,
    org-narrow-to-block, org-narrow-to-element): Mention how to widen in
    docstrings of commands that do narrowing.
    
    TINYCHANGE
---
 lisp/org.el | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index ab6212dacc..fca3ab880d 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -7220,7 +7220,8 @@ If yes, remember the marker and the distance to BEG."
   (setq org-markers-to-move nil))
 
 (defun org-narrow-to-subtree (&optional element)
-  "Narrow buffer to the current subtree."
+  "Narrow buffer to the current subtree.
+Use the command `\\[widen]' to see the whole buffer again."
   (interactive)
   (if (org-element--cache-active-p)
       (let* ((heading (org-element-lineage
@@ -7242,7 +7243,8 @@ If yes, remember the marker and the distance to BEG."
                 (point))))))))
 
 (defun org-toggle-narrow-to-subtree ()
-  "Narrow to the subtree at point or widen a narrowed buffer."
+  "Narrow to the subtree at point or widen a narrowed buffer.
+Use the command `\\[widen]' to see the whole buffer again."
   (interactive)
   (if (buffer-narrowed-p)
       (progn (widen) (message "Buffer widen"))
@@ -7250,7 +7252,8 @@ If yes, remember the marker and the distance to BEG."
     (message "Buffer narrowed to current subtree")))
 
 (defun org-narrow-to-block ()
-  "Narrow buffer to the current block."
+  "Narrow buffer to the current block.
+Use the command `\\[widen]' to see the whole buffer again."
   (interactive)
   (let* ((case-fold-search t)
         (blockp (org-between-regexps-p "^[ \t]*#\\+begin_.*"
@@ -21162,7 +21165,8 @@ ones already marked."
        (goto-char (org-element-property :begin element))))))
 
 (defun org-narrow-to-element ()
-  "Narrow buffer to current element."
+  "Narrow buffer to current element.
+Use the command `\\[widen]' to see the whole buffer again."
   (interactive)
   (let ((elem (org-element-at-point)))
     (cond



reply via email to

[Prev in Thread] Current Thread [Next in Thread]