diff options
author | Gustav Wikström <gustav@whil.se> | 2019-09-29 08:54:58 +0200 |
---|---|---|
committer | Gustav Wikström <gustav@whil.se> | 2019-09-29 09:02:17 +0200 |
commit | 617559353091588f520bfcceb6b14f4bcfc94ddd (patch) | |
tree | 628d08015913206af0cb581a4341f30d93b59ecc | |
parent | 1fd07c1eeb0f29de9ce058fac995031413201d4d (diff) | |
download | org-mode-617559353091588f520bfcceb6b14f4bcfc94ddd.tar.gz |
Fix predicate comment string
Ref. (info "(elisp) Documentation Tips")
* lisp/org.el (org-at-comment-p, org-at-drawer-p)
(org-at-block-p): Fix documentation.
-rw-r--r-- | lisp/org.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org.el b/lisp/org.el index 450d160..cb83bef 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -20511,20 +20511,20 @@ unless optional argument NO-INHERITANCE is non-nil." (save-excursion (and (org-up-heading-safe) (org-in-commented-heading-p)))))) (defun org-at-comment-p nil - "Is cursor in a commented line?" + "Return t if cursor is in a commented line." (save-excursion (save-match-data (beginning-of-line) (looking-at "^[ \t]*# ")))) (defun org-at-drawer-p nil - "Is cursor at a drawer keyword?" + "Return t if cursor is at a drawer keyword." (save-excursion (move-beginning-of-line 1) (looking-at org-drawer-regexp))) (defun org-at-block-p nil - "Is cursor at a block keyword?" + "Return t if cursor is at a block keyword." (save-excursion (move-beginning-of-line 1) (looking-at org-block-regexp))) |