org-capture: Silence byte-compiler
* lisp/org-capture.el (org-capture-set-target-location): Fix pcase patterns.
This commit is contained in:
parent
1c4a3c4f69
commit
2f9188658b
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue