Browse Source

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

* lisp/org.el (org-get-at-bol): Move...
* lisp/org-macs.el: ... here.
Nicolas Goaziou 7 years ago
parent
commit
6e7d152699
2 changed files with 4 additions and 4 deletions
  1. 4 0
      lisp/org-macs.el
  2. 0 4
      lisp/org.el

+ 4 - 0
lisp/org-macs.el

@@ -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

+ 0 - 4
lisp/org.el

@@ -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)