diff options
author | Kyle Meyer <kyle@kyleam.com> | 2015-02-09 22:20:26 -0500 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2015-02-09 22:20:26 -0500 |
commit | c9279118186fbcf1caa28baf12c7be8f922854e1 (patch) | |
tree | 73bda3dd7a7fc1724e2b2c99e61f768d8f2dfbcf | |
parent | 81e3fba86d8cb4fa7186afbda7ad59c4287cc6df (diff) | |
download | bog-c9279118186fbcf1caa28baf12c7be8f922854e1.tar.gz |
Activate Org mode after inserting file contents
Otherwise, setup file will not be loaded, which results in some
citekey headings not being found if custom TODO words are used.
-rw-r--r-- | bog.el | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -339,8 +339,8 @@ word constituents." (defun bog-heading-citekeys-in-file (file) "Return all citekeys in headings of FILE." (with-temp-buffer - (org-mode) (insert-file-contents file) + (org-mode) (bog-heading-citekeys-in-buffer))) (defun bog-heading-citekeys-in-buffer () @@ -356,8 +356,8 @@ word constituents." (let (citekeys case-fold-search) (with-temp-buffer - (org-mode) (insert-file-contents file) + (org-mode) (while (re-search-forward bog-citekey-format nil t) (unless (or (org-at-heading-p) (org-at-property-p)) |