destructuring-bind => cl-destructuring-bind

This commit is contained in:
Henrik Lissner
2018-06-30 02:53:35 +02:00
parent 15f2e21468
commit 66e62e8b6e

View File

@ -168,7 +168,7 @@ Uses `+workspaces-main' to determine the name of the main workspace."
(list tag (buffer-name buf) vars
(buffer-name (buffer-base-buffer))))
: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)
(push (cons buf-name base-buf-name)
+workspaces--indirect-buffers-to-restore)