mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-03 12:27:26 -05:00
destructuring-bind => cl-destructuring-bind
This commit is contained in:
@ -20,7 +20,7 @@
|
||||
(defun +evil/reselect-paste ()
|
||||
"Go back into visual mode and reselect the last pasted region."
|
||||
(interactive)
|
||||
(destructuring-bind (_ _ _ beg end &optional _)
|
||||
(cl-destructuring-bind (_ _ _ beg end &optional _)
|
||||
evil-last-paste
|
||||
(evil-visual-make-selection
|
||||
(save-excursion (goto-char beg) (point-marker))
|
||||
|
@ -32,7 +32,7 @@
|
||||
(evil-initialize-state 'insert))))
|
||||
|
||||
(defun +file-templates-add (args)
|
||||
(destructuring-bind (regexp trigger mode &optional project-only-p) args
|
||||
(cl-destructuring-bind (regexp trigger mode &optional project-only-p) args
|
||||
(define-auto-insert
|
||||
regexp
|
||||
(vector `(lambda () (+file-templates--expand ,trigger ',mode ,project-only-p))))))
|
||||
|
@ -56,7 +56,7 @@ Tries xref and falls back to `dumb-jump', then rg/ag, then
|
||||
|
||||
((and (featurep 'evil)
|
||||
evil-mode
|
||||
(destructuring-bind (beg end)
|
||||
(cl-destructuring-bind (beg end)
|
||||
(bounds-of-thing-at-point 'symbol)
|
||||
(evil-goto-definition)
|
||||
(let ((pt (point)))
|
||||
|
@ -16,7 +16,7 @@
|
||||
repository root."
|
||||
(interactive)
|
||||
(require 'git-link)
|
||||
(destructuring-bind (beg end)
|
||||
(cl-destructuring-bind (beg end)
|
||||
(if buffer-file-name (git-link--get-region))
|
||||
(let ((git-link-open-in-browser t))
|
||||
(git-link (git-link--select-remote) beg end))))
|
||||
|
Reference in New Issue
Block a user