admin/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Config: add init-org-refile.el , fix dirvish quick access path

Browse Source
This commit is contained in:
User
2026-04-09 16:04:01 +08:00
parent 41c64ca475
commit c3c59376f0
4 changed files with 170 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
lisp/init-org.el
View File

@@ -159,8 +159,8 @@
"h:/emacs/my-org-daily/"
"h:/emacs/my-org-note/")))
(when *is-mac*
(with-eval-after-load 'org
(setq org-agenda-files '("~/org/my-org-daily"))))
(setq org-agenda-files '("~/org/my-org-daily"
"~/org/my-org-note/")))
(setq org-agenda-span 'day)
@@ -243,19 +243,23 @@
;; (setq org-tags-exclude-from-inheritance '())
;; capture模板
(when *is-windows*
(defvar my-org-capture-temp-title "" "Temporarily store the org-capture filename.")
(setq org-capture-templates
'(("n" "New Note" plain
(file (lambda ()
(setq my-org-capture-temp-title (read-string "Filename (without .org): "))
(expand-file-name (format "%s/%s-%s.org"
"h:/emacs/my-org-note"
(defvar my-org-capture-temp-title "" "Temporarily store the org-capture filename.")
(setq org-capture-templates
'(("n" "New Note" plain
(file (lambda ()
(setq my-org-capture-temp-title (read-string "Filename (without .org): "))
(expand-file-name (if *is-windows*
(format "%s/%s-%s.org"
"h:/emacs/my-org-note/"
(format-time-string "%Y%m%d")
my-org-capture-temp-title)
(format "%s/%s-%s.org"
"~/org/my-org-note/"
(format-time-string "%Y%m%d")
my-org-capture-temp-title))))
"#+title: %(symbol-value 'my-org-capture-temp-title)
my-org-capture-temp-title)))))
"#+title: %(symbol-value 'my-org-capture-temp-title)
#+date: %U
#+category: %^{Category|none|plan|book|article|note|insight}
#+category: %^{Category|none|project|book|article|note|insight}
* %(symbol-value 'my-org-capture-temp-title) %^g
%U
@@ -269,13 +273,7 @@
# org-use-tag-inheritance: nil
# End:
"
:jump-to-captured t))))
(when *is-mac*
(setq org-capture-templates
'(("t" "Todo" entry (file+headline "~/org/some-orgs/todos.org" "Workspace")
"* TODO [#B] %?\n %i\n %U"
:empty-lines 1))))
:jump-to-captured t)))
(global-set-key (kbd "C-c o c") 'org-capture)