Compare commits

...

2 commits

Author SHA1 Message Date
Timothy bbf5aefd5e
Tweak Org package recipe 2022-08-14 20:37:31 +08:00
Timothy 5490df9a96
Mu4e: update personal addresses on first compose 2022-08-14 20:18:16 +08:00

View file

@ -5149,9 +5149,8 @@ aware of.
"\\`\\(.*\\)@" alias primary-address t t 1)) "\\`\\(.*\\)@" alias primary-address t t 1))
'("contact" "timothy"))))))) '("contact" "timothy")))))))
(defadvice! +mu4e-update-personal-addresses-a () (add-transient-hook! 'mu4e-compose-pre-hook
:after #'mu4e--server-start (+mu4e-update-personal-addresses))
(run-at-time 0.1 nil #'+mu4e-update-personal-addresses))
#+end_src #+end_src
**** Working with the Org mailing list **** Working with the Org mailing list
@ -5591,7 +5590,7 @@ correct package statement needed.
(string= "tec@git.savannah.gnu.org:/srv/git/emacs/org-mode.git\n" (shell-command-to-string "git remote get-url origin"))))) (string= "tec@git.savannah.gnu.org:/srv/git/emacs/org-mode.git\n" (shell-command-to-string "git remote get-url origin")))))
(recipe-common '(:files ("*.el" "lisp/*.el" "etc") (recipe-common '(:files ("*.el" "lisp/*.el" "etc")
:pre-build :pre-build
(with-temp-file (doom-path (straight--repos-dir "org-mode") "org-version.el") (with-temp-file "org-version.el"
(insert "(fset 'org-release (lambda () \"9.5\"))\n" (insert "(fset 'org-release (lambda () \"9.5\"))\n"
(format "(fset 'org-git-version (lambda () \"%s\"))\n" (format "(fset 'org-git-version (lambda () \"%s\"))\n"
(substring (shell-command-to-string "git rev-parse --short HEAD") 0 -1)) (substring (shell-command-to-string "git rev-parse --short HEAD") 0 -1))