summaryrefslogtreecommitdiff
path: root/bog.el
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2015-02-19 23:00:32 -0500
committerKyle Meyer <kyle@kyleam.com>2015-02-19 23:00:32 -0500
commit4e15cf57d5dcd11bd9e3195dc80fe4913d80a400 (patch)
treee4486f970ae6b36e257fbe3dda22b73c08d3d0c4 /bog.el
parent0866f39b51f18044994118fcdb8d3e85a048da2e (diff)
downloadbog-4e15cf57d5dcd11bd9e3195dc80fe4913d80a400.tar.gz
bog-bib-citekeys: Remove extension
Remove '.bib' from citekeys, which was introduced in 16b60db1.
Diffstat (limited to 'bog.el')
-rw-r--r--bog.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/bog.el b/bog.el
index 5fd42dc..c81e67f 100644
--- a/bog.el
+++ b/bog.el
@@ -739,8 +739,9 @@ instead of citekeys from file names in `bog-bib-directory'."
(when (and (file-readable-p df) (file-directory-p df))
(push df dirs)))
(push bog-bib-directory dirs))
- (cl-mapcan (lambda (dir) (directory-files dir nil ".*\\.bib$"))
- dirs))))
+ (mapcar #'file-name-sans-extension
+ (cl-mapcan (lambda (dir) (directory-files dir nil ".*\\.bib$"))
+ dirs)))))
;;; Web