ryuslash/emacs-config
1
0
Fork 0
Code Activity

[oni-org] Fix ‘oni-org-find-knowledge-file’

Browse source 
Make sure that any new files for notes are created in the
‘oni-org-knowledge-directory’ directory and not in whichever directory the
current buffer is visiting.
This commit is contained in:
Tom Willemse 2021-07-30 23:13:56 -07:00
parent a352d0983a
commit f846a15a07
Signed by: ryuslash
GPG key ID: 7D5C407B435025C1
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
oni-org/oni-org.el
View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 2021.0724.010848 ;; Version: 2021.0730.213310
;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org org-contrib org-bullets org-edna diminish all-the-icons olivetti) ;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org org-contrib org-bullets org-edna diminish all-the-icons olivetti)
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
@ -126,7 +126,8 @@
;; exist yet, it’s created and the title is inserted into it. ;; exist yet, it’s created and the title is inserted into it.
(defun oni-org-find-knowledge-file () (defun oni-org-find-knowledge-file ()
(interactive) (interactive)
(let* ((completions (oni-org--get-knowledge-files)) (let* ((default-directory oni-org-knowledge-directory)
(completions (oni-org--get-knowledge-files))
(pick (completing-read "File: " completions)) (pick (completing-read "File: " completions))
(file (car (alist-get pick completions nil nil #'string=)))) (file (car (alist-get pick completions nil nil #'string=))))
(if file (if file