From abc4af1deb53bd27c934423b348a338ce8615a02 Mon Sep 17 00:00:00 2001
From: Antoine Martin <antoine@alarsyo.net>
Date: Mon, 11 Apr 2022 20:22:23 +0200
Subject: [PATCH] Fix org-capture bug

---
 config.org | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/config.org b/config.org
index 3a28cfd..52073fa 100644
--- a/config.org
+++ b/config.org
@@ -38,6 +38,7 @@
     - [[#org-roam-ui][org-roam-ui]]
   - [[#export-backends][Export backends]]
   - [[#doom-specific][Doom specific]]
+    - [[#bugfix][Bugfix]]
 - [[#magit][Magit]]
   - [[#gitlab-ci-skip-flag][Gitlab CI skip flag]]
   - [[#magit-delta][magit-delta]]
@@ -485,6 +486,23 @@ one. Taken from [[https://github.com/hlissner/doom-emacs/tree/develop/modules/la
   (remove-hook 'org-tab-first-hook #'+org-cycle-only-current-subtree-h))
 #+END_SRC
 
+*** Bugfix
+
+Fix a bug with capture mode not working correctly when agenda is opened, stolen
+from https://github.com/hlissner/doom-emacs/issues/5714#issuecomment-1018788028
+
+#+begin_src emacs-lisp
+(after! org
+  (defadvice! dan/+org--restart-mode-h-careful-restart (fn &rest args)
+    :around #'+org--restart-mode-h
+    (let ((old-org-capture-current-plist (and (bound-and-true-p org-capture-mode)
+                                              (bound-and-true-p org-capture-current-plist))))
+      (apply fn args)
+      (when old-org-capture-current-plist
+        (setq-local org-capture-current-plist old-org-capture-current-plist)
+        (org-capture-mode +1)))))
+#+end_src
+
 * Magit
 
 ** Gitlab CI skip flag