mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 18:36:26 +00:00
Code Releases Activity

org-macs: Add missing docstring

Browse source 
* lisp/org-macs.el (org-current-line-string): Add missing docstring.
This commit is contained in:
Nicolas Goaziou 2018-10-06 09:44:35 +02:00
parent 5cc69a9ebf
commit e7911a0fb1
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/org-macs.el
View file

@ -887,7 +887,11 @@ removed."
(org-unbracket-string "\"" "\"" string))
(defsubst org-current-line-string (&optional to-here)
(buffer-substring (point-at-bol) (if to-here (point) (point-at-eol))))
"Return current line, as a string.
If optional argument TO-HERE is non-nil, return string from
beginning of line up to point."
(buffer-substring (line-beginning-position)
(if to-here (point) (line-end-position))))
(defun org-shorten-string (s maxlength)
"Shorten string S so that it is no longer than MAXLENGTH characters.