Removing perspective

home.org

@@ -834,7 +834,6 @@ These are just some general settings that apply everywhere. First, a few package
         free-keys
         ligature
         mixed-pitch
-        perspective
         popper
       ];
       extraConfig = builtins.readFile ./emacs-global.el;
@@ -1118,27 +1117,6 @@ content to be.
            (t
             (window--display-buffer buffer (jf/topright-window (jf/window-leaves main)) 'reuse alist)))))
 
-      ;; (require 'perspective)
-      ;; (setopt persp-mode-prefix-key (kbd "C-x t"))
-      ;; (setopt persp-show-modestring nil)
-      ;; (persp-mode)
-
-      ;; (defun jf/popper-group-by-owning-perspective ()
-      ;;   "Return the name of the perspective that owns the current buffer.
-
-      ;; Unlike `popper-group-by-perspective', which just returns whichever
-      ;; perspective happens to be active on the frame right now, this looks
-      ;; up which perspective's buffer list the popup buffer actually belongs
-      ;; to. This matters because popper re-groups popups on
-      ;; `window-configuration-change-hook', which perspective.el triggers
-      ;; *after* switching the frame's active perspective -- so
-      ;; `popper-group-by-perspective' ends up filing a popup under the
-      ;; perspective you just switched *to* rather than the one it came from."
-      ;;   (let ((buf (current-buffer)))
-      ;;     (or (cl-loop for persp being the hash-values of (perspectives-hash (selected-frame))
-      ;;                  if (memq buf (persp-buffers persp))
-      ;;                  return (persp-name persp))
-      ;;         (persp-current-name))))
 
       (setopt popper-reference-buffers
               '("\\*Flymake diagnostics .*"
@@ -1163,7 +1141,6 @@ content to be.
                 "\\*List .*"
                 "\\*eldoc\\*"))
       (setopt popper-display-control nil)
-      ;; (setopt popper-group-function 'jf/popper-group-by-owning-perspective)
 
       (popper-mode)
       (popper-echo-mode)
@@ -1925,21 +1902,6 @@ for completion. That makes it really annoying to use; don't use yasnippet with e
   (eval-when-compile
     (require 'consult))
 
-  ;; (require 'perspective)
-  ;; (with-eval-after-load 'consult
-  ;;   (consult-customize
-  ;;    consult-theme :preview-key '(:debounce 0.2 any)
-  ;;    consult-ripgrep consult-git-grep consult-grep consult-man
-  ;;    consult-bookmark consult-recent-file consult-xref
-  ;;    consult-source-bookmark consult-source-file-register
-  ;;    consult-source-recent-file
-  ;;    consult-source-buffer
-  ;;    ;; :preview-key "M-."
-  ;;    consult-source-project-recent-file
-  ;;    :preview-key '(:debounce 0.4 any))
-  ;;   (consult-customize consult-source-buffer :hidden t :default nil)
-  ;;   (add-to-list 'consult-buffer-sources persp-consult-source))
-
   (with-eval-after-load 'consult
     (consult-customize
      consult-theme :preview-key '(:debounce 0.2 any)