Merge branch 'blahgeek-reactivate-preserve-order'

1 files changed, 4 insertions, 4 deletions

diff --git a/perspective.el b/perspective.el
index d85f97d..be4b5de 100644
--- a/perspective.el
+++ b/perspective.el
@@ -663,11 +663,11 @@ buffer called \"*scratch* (NAME)\"."
 Returns BUFFERS with all non-living buffers removed.
 
 See also `other-buffer'."
-  (cl-loop for buf in (reverse buffers)
-           when (buffer-live-p buf)
-           collect buf into living-buffers
+  (cl-loop for buf in (reverse (buffer-list))
+           when (and (buffer-live-p buf) (member buf buffers))
+           collect buf into result-buffers
            and do (switch-to-buffer buf)
-           finally return (nreverse living-buffers)))
+           finally return result-buffers))
 
 (defun persp-set-local-variables (vars)
   "Set the local variables given in VARS.