Merge pull request #106 from nex3/zenspider/test-cleanup

Clean up buffer cleanup test code.
nex3 · Oct 25, 2019 · 9e119c9 · 9e119c9
2 parents cc7631a + 32ea467
commit 9e119c9
Showing 1 changed file with 3 additions and 5 deletions.
diff --git a/test/test-perspective.el b/test/test-perspective.el
@@ -48,11 +48,9 @@ perspectives and open buffers."
  (persp-mode 1)
  ,@body
  ;; get rid of perspective-specific *scratch* buffers first
- (mapc #'kill-buffer (mapcar (lambda (persp)
- (format "*scratch* (%s)" persp))
- (remove-if (lambda (persp)
- (string-equal "main" persp))
- (persp-names))))
+ (mapc (lambda (persp)
+ (kill-buffer (format "*scratch* (%s)" persp)))
+ (delq persp-initial-frame-name (persp-names)))
  (persp-mode -1)
  (mapc #'kill-buffer (persp-test-buffer-list-all))))