jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

WIP: Don't use -let?

Browse source 
Grasping at straws here...
This commit is contained in:
Adam Porter 2021-07-05 02:37:18 -05:00
parent 3d6747f427
commit b7c0edfc71
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
org-ql.el
View file

@ -1162,7 +1162,10 @@ result form."
;; do with the version of map.el being used (although it happens locally even in ;; do with the version of map.el being used (although it happens locally even in
;; a clean sandbox, which should produce the same result as on CI). Maybe the ;; a clean sandbox, which should produce the same result as on CI). Maybe the
;; real fix would be to make makem.sh support dependency versions... ;; real fix would be to make makem.sh support dependency versions...
`(-let (((&keys :from :to :on :type) rest) `(let ((from (plist-get rest :from))
(to (plist-get rest :to))
(on (plist-get rest :on))
(type (plist-get rest :type))
(result)) (result))
(ignore type) ;; Only (ts) uses it. (ignore type) ;; Only (ts) uses it.
(pcase rest (pcase rest