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 /bog.el | |
| 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.
Diffstat (limited to 'bog.el')
| -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)) |