Update: (org-ql-view-save) Require map 2.0 and use map-elt
I upgrade to map.el 2.0 (from ELPA) locally, which deprecates this TESTFN argument.
This commit is contained in:
parent
6e3c0d3c68
commit
b601a1e777
1 changed files with 2 additions and 2 deletions
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
;; Author: Adam Porter <adam@alphapapa.net>
|
||||
;; Url: https://github.com/alphapapa/org-ql
|
||||
;; Package-Requires: ((transient))
|
||||
;; Package-Requires: ((transient) (map "2.0"))
|
||||
|
||||
;;; Commentary:
|
||||
|
||||
|
|
@ -343,7 +343,7 @@ update search arguments."
|
|||
:narrow org-ql-view-narrow
|
||||
:super-groups org-ql-view-super-groups
|
||||
:title name)))
|
||||
(when (or (not (map-elt org-ql-views name nil #'equal))
|
||||
(when (or (not (map-elt org-ql-views name nil))
|
||||
(yes-or-no-p (format "Overwrite view \"%s\"?" name)))
|
||||
(setf (map-elt org-ql-views name nil #'equal) plist)
|
||||
(customize-set-variable 'org-ql-views org-ql-views)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue