Add modules/lang/org (WIP)
This commit is contained in:
parent
c3159b5649
commit
941f3abc6f
10 changed files with 912 additions and 0 deletions
10
modules/lang/org/autoload/util.el
Normal file
10
modules/lang/org/autoload/util.el
Normal file
|
@ -0,0 +1,10 @@
|
|||
;;; emacs/org/autoload/util.el
|
||||
|
||||
;;;###autoload
|
||||
(defun +org-get-property (name &optional file)
|
||||
"Get a propery from an org file."
|
||||
(save-excursion
|
||||
(goto-char 1)
|
||||
(re-search-forward (format "^#\\+%s:[ \t]*\\([^\n]+\\)" (upcase name)) nil t)
|
||||
(buffer-substring-no-properties (match-beginning 1) (match-end 1))))
|
||||
|
Loading…
Add table
Add a link
Reference in a new issue