diff options
| author | Yann Herklotz <git@yannherklotz.com> | 2020-10-06 14:51:20 +0100 |
|---|---|---|
| committer | Yann Herklotz <git@yannherklotz.com> | 2020-10-06 14:51:20 +0100 |
| commit | 541d85d78160aaccaa37d6303a5e85ad1f71d3f3 (patch) | |
| tree | f7d87648d271f511474dc8c1e893b250535f9ae3 | |
| parent | b98ee731f32a0c79a314c2f87db679df9170317a (diff) | |
| download | emacs-zettelkasten-541d85d78160aaccaa37d6303a5e85ad1f71d3f3.tar.gz emacs-zettelkasten-541d85d78160aaccaa37d6303a5e85ad1f71d3f3.zip | |
Fix site map generation
| -rw-r--r-- | zettelkasten.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/zettelkasten.el b/zettelkasten.el index 9338540..c4fb0f9 100644 --- a/zettelkasten.el +++ b/zettelkasten.el @@ -320,14 +320,6 @@ If PARENT is nil, it will not add a link from a PARENT." #'(lambda (tag) (let* ((ismember (member tag ti)) (currlist (car (cdr ismember)))) - (concat "** " tag "\n :PROPERTIES:\n :CUSTOM_ID: " tag "\n :END:\n\n" - (apply - 'concat - (mapcar - #'(lambda (note) - (concat "- " (zettelkasten--format-link note) "\n")) - currlist)) - "\n") (with-temp-buffer (set-visited-file-name (concat tag ".org")) (set-buffer-file-coding-system 'utf-8) @@ -338,7 +330,15 @@ If PARENT is nil, it will not add a link from a PARENT." #'(lambda (note) (concat "- " (zettelkasten--format-link note) "\n")) currlist)))) - (save-buffer)))) + (save-buffer)) + (concat "** " tag "\n :PROPERTIES:\n :CUSTOM_ID: " tag "\n :END:\n\n" + (apply + 'concat + (mapcar + #'(lambda (note) + (concat "- " (zettelkasten--format-link note) "\n")) + currlist)) + "\n"))) tags))))) (defun zettelkasten-org-export-preprocessor (backend) |