From 0b8eff73a2eee987209920c3d9e66cda07fed0bb Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 24 May 2014 21:38:08 -0400 Subject: Move default notes directory to subdirectory --- bog.el | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/bog.el b/bog.el index 5f3e9c9..5fd77ee 100644 --- a/bog.el +++ b/bog.el @@ -94,19 +94,26 @@ default value of `org-bibtex-key-property'." :group 'bog :type 'string) -(defcustom bog-notes-directory "~/bib" +(defcustom bog-root-directory "~/bib" + "Root directory used to define default values of other Bog +directories." + :group 'bog + :type 'string) + +(defcustom bog-notes-directory + (expand-file-name "notes" bog-root-directory) "Directory with Org research notes." :group 'bog :type 'string) (defcustom bog-file-directory - (expand-file-name "citekey-files" bog-notes-directory) + (expand-file-name "citekey-files" bog-root-directory) "Directory with citekey-associated files." :group 'bog :type 'string) (defcustom bog-stage-directory - (expand-file-name "stage" bog-notes-directory) + (expand-file-name "stage" bog-root-directory) "Directory to search for new files. `bog-rename-staged-file-to-citekey' and `bog-rename-staged-bib-to-citekey' will search here for files to @@ -126,7 +133,7 @@ a single BibTeX file, `bog-bib-file', for the citekey entry." :type 'function) (defcustom bog-bib-directory - (expand-file-name "bibs" bog-notes-directory) + (expand-file-name "bibs" bog-root-directory) "The name of the directory that BibTeX files are stored in. This is only meaningful if `bog-find-citekey-bib-func' set to `bog-find-citekey-bib-file'." -- cgit v1.2.3