From 2f9188658b09cafd53a39f3e62d325592aab33b1 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Mon, 9 Dec 2019 22:14:01 +0100 Subject: [PATCH] org-capture: Silence byte-compiler * lisp/org-capture.el (org-capture-set-target-location): Fix pcase patterns. --- lisp/org-capture.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/org-capture.el b/lisp/org-capture.el index 39121d1fb..ef3561563 100644 --- a/lisp/org-capture.el +++ b/lisp/org-capture.el @@ -996,12 +996,13 @@ Store them in the capture property list." (org-capture-put-target-region-and-position) (widen) ;; Make a date/week tree entry, with the current date (or - ;; yesterday, if we are extending dates for a couple of hours) + ;; yesterday, if we are extending dates for a couple of + ;; hours) (funcall (pcase (org-capture-get :tree-type) - ('week #'org-datetree-find-iso-week-create) - ('month #'org-datetree-find-month-create) - (t #'org-datetree-find-date-create)) + (`week #'org-datetree-find-iso-week-create) + (`month #'org-datetree-find-month-create) + (_ #'org-datetree-find-date-create)) (calendar-gregorian-from-absolute (cond (org-overriding-default-time