mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-05 11:45:52 +00:00
Code

Move `org-get-at-bol' into "org-macs.el"

Browse Source 
* lisp/org.el (org-get-at-bol): Move...
* lisp/org-macs.el: ... here.
This commit is contained in:
Nicolas Goaziou 2017-09-18 21:26:18 +02:00
parent 32890ea5a5
commit 6e7d152699
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-macs.el
View File

@ -372,6 +372,10 @@ the value in cdr."
(cons (list (car flat) (cadr flat))
(org-make-parameter-alist (cddr flat)))))
(defsubst org-get-at-bol (property)
"Get text property PROPERTY at the beginning of line."
(get-text-property (point-at-bol) property))
;;; Local variables

4
lisp/org.el
View File

@ -186,10 +186,6 @@ Stars are put in group 1 and the trimmed body in group 2.")
(defvar ffap-url-regexp) ;Silence byte-compiler
(defsubst org-get-at-bol (property)
"Get text property PROPERTY at the beginning of line."
(get-text-property (point-at-bol) property))
;; load languages based on value of `org-babel-load-languages'
(defvar org-babel-load-languages)