From: Nicolas Graves via Guix-patches via <guix-patches@gnu.org>
To: 65753@debbugs.gnu.org
Cc: ngraves@ngraves.fr, andrew@trop.in
Subject: [bug#65753] [PATCH 1/2] feature: emacs-org-dynamic-agenda: Properly integrate with org-ql.
Date: Tue, 5 Sep 2023 12:35:01 +0200 [thread overview]
Message-ID: <20230905103502.28497-1-ngraves@ngraves.fr> (raw)
In-Reply-To: <87msy0rjwd.fsf@ngraves.fr>
---
src/rde/features/emacs-xyz.scm | 19 ++++++++++++++-----
1 file changed, 14 insertions(+), 5 deletions(-)
diff --git a/src/rde/features/emacs-xyz.scm b/src/rde/features/emacs-xyz.scm
index 0463a98a..74bbdf7a 100644
--- a/src/rde/features/emacs-xyz.scm
+++ b/src/rde/features/emacs-xyz.scm
@@ -4483,9 +4483,11 @@ package is unconfigured but it plays along with emacs-org-dynamic-agenda."
(define* (feature-emacs-org-dynamic-agenda
#:key
- (emacs-org-dynamic-agenda emacs-org-dynamic-agenda))
- "Configure org-dynamic-agenda for GNU Emacs."
+ (emacs-org-dynamic-agenda emacs-org-dynamic-agenda)
+ (emacs-org-ql-dynamic-agenda emacs-org-ql-dynamic-agenda))
+ "Configure org-dynamic-agenda or org-ql-dynamic-agenda for GNU Emacs."
(ensure-pred file-like? emacs-org-dynamic-agenda)
+ (ensure-pred file-like? emacs-org-ql-dynamic-agenda)
(define emacs-f-name 'org-dynamic-agenda)
(define f-name (symbol-append 'emacs- emacs-f-name))
@@ -4495,12 +4497,19 @@ package is unconfigured but it plays along with emacs-org-dynamic-agenda."
(rde-elisp-configuration-service
emacs-f-name
config
- `((require 'org-dynamic-agenda))
+ `(,@(if (get-value 'emacs-org-ql config)
+ '((require 'org-ql-dynamic-agenda)
+ (setq org-agenda-include-diary nil))
+ '((require 'org-dynamic-agenda))))
#:summary "\
Org dynamic agenda"
- #:commentary ""
+ #:commentary "\
+This hook records files that should be saved as agenda-files, making the refreshing
+and loading of org-agenda faster (and even faster with org-ql cache)."
#:keywords '(convenience)
- #:elisp-packages (list emacs-org-dynamic-agenda))))
+ #:elisp-packages (list (if (get-value 'emacs-org-ql config)
+ emacs-org-ql-dynamic-agenda
+ emacs-org-dynamic-agenda)))))
(feature
(name f-name)
--
2.41.0
next prev parent reply other threads:[~2023-09-05 10:36 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-09-05 10:31 [bug#65753] [PATCH 0/2] emacs-org-dynamic-agenda Nicolas Graves via Guix-patches via
2023-09-05 10:35 ` Nicolas Graves via Guix-patches via [this message]
2023-09-05 10:36 ` [bug#65753] [PATCH v2 1/2] gnu: Add emacs-org-dynamic-agenda Nicolas Graves via Guix-patches via
2023-09-05 10:36 ` [bug#65753] [PATCH v2 2/2] gnu: Add emacs-org-ql-dynamic-agenda Nicolas Graves via Guix-patches via
2023-09-07 12:27 ` bug#65753: [PATCH v2 1/2] gnu: Add emacs-org-dynamic-agenda Andrew Tropin
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20230905103502.28497-1-ngraves@ngraves.fr \
--to=guix-patches@gnu.org \
--cc=65753@debbugs.gnu.org \
--cc=andrew@trop.in \
--cc=ngraves@ngraves.fr \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.