Emacs hook to only show current perspective's buffers in iswitchb

iswitchb-persp-curr-only.el

;; For perspective.el:
;;    https://github.com/nex3/perspective-el

(defun iswitchb-persp-curr-only ()
  (let* ((names (remq nil (mapcar 'buffer-name (persp-buffers persp-curr))))
         (matches (remove-if-not (lambda (x) (member x names)) iswitchb-temp-buflist)))
    (setf iswitchb-temp-buflist matches)))
      
(add-hook 'iswitchb-make-buflist-hook 'iswitchb-persp-curr-only)