diff options
| author | jao <jao@gnu.org> | 2022-09-04 05:44:14 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-09-04 05:44:14 +0100 |
| commit | 7024463ca8513ec56dc6e7bbe70d96b4eb601cb9 (patch) | |
| tree | d7940934a7a858dc68d8c053bb66eb780fa999e7 /lib/doc | |
| parent | b898efed72f7b7e47c94be3a99264393d5bc4364 (diff) | |
| download | elibs-7024463ca8513ec56dc6e7bbe70d96b4eb601cb9.tar.gz elibs-7024463ca8513ec56dc6e7bbe70d96b4eb601cb9.tar.bz2 | |
jao-org-notes: fix for tags insertion command
Diffstat (limited to 'lib/doc')
| -rw-r--r-- | lib/doc/jao-org-notes.el | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/lib/doc/jao-org-notes.el b/lib/doc/jao-org-notes.el index 62ee1ef..3f3c5ea 100644 --- a/lib/doc/jao-org-notes.el +++ b/lib/doc/jao-org-notes.el @@ -38,7 +38,7 @@ (cons (format "%s %s" (replace-regexp-in-string "^\\./" "" (car m)) (replace-regexp-in-string "[0-9]+:#\\+\\(title\\|tags\\):" - " (\\2)" (cadr m))) + " (\\1)" (cadr m))) (expand-file-name (car m) default-directory))) (defun jao-org-notes--matches (lines) @@ -120,9 +120,8 @@ (insert "\n")) (defun jao-org-notes--template (k) - `(,k "Note" plain (file jao-org-notes-open-or-create) - "\n- %a\n %i" - :jump-to-captured t)) + `(,k "Note" plain (file jao-org-notes-create) + "\n- %a\n %i" :jump-to-captured t)) ;;;###autoload (defun jao-org-notes-open () @@ -132,8 +131,8 @@ (find-file f))) ;;;###autoload -(defun jao-org-notes-open-or-create () - "Open or create a new note file, matching tags and titles with completion." +(defun jao-org-notes-create () + "Create a new note file, matching tags and titles with completion." (interactive) (when (jao-org-notes--insert-title) (jao-org-notes--insert-date) @@ -159,7 +158,7 @@ (defun jao-org-notes-insert-tags () "Insert a list of tags at point, with completing read." (interactive) - (insert (mapconcat 'identity (jao-org-notes--read-tags) " "))) + (insert ":" (mapconcat 'identity (jao-org-notes--read-tags) ":") ":")) ;;;###autoload (defun jao-org-notes-insert-link () |