destructuring-bind => cl-destructuring-bind
This commit is contained in:
parent
15f2e21468
commit
66e62e8b6e
1 changed files with 1 additions and 1 deletions
|
@ -168,7 +168,7 @@ Uses `+workspaces-main' to determine the name of the main workspace."
|
||||||
(list tag (buffer-name buf) vars
|
(list tag (buffer-name buf) vars
|
||||||
(buffer-name (buffer-base-buffer))))
|
(buffer-name (buffer-base-buffer))))
|
||||||
:load-function (lambda (savelist &rest _rest)
|
:load-function (lambda (savelist &rest _rest)
|
||||||
(destructuring-bind (buf-name _vars base-buf-name &rest _)
|
(cl-destructuring-bind (buf-name _vars base-buf-name &rest _)
|
||||||
(cdr savelist)
|
(cdr savelist)
|
||||||
(push (cons buf-name base-buf-name)
|
(push (cons buf-name base-buf-name)
|
||||||
+workspaces--indirect-buffers-to-restore)
|
+workspaces--indirect-buffers-to-restore)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue