mirror of
https://github.com/doomemacs/doomemacs
synced 2025-09-10 15:33:36 -05:00
feat(workspaces): +workspace/switch-to: add buffer list column
To offer more context for ivy users while switching between workspaces. Close: #3006 Co-authored-by: rgrinberg <rgrinberg@users.noreply.github.com>~
This commit is contained in:
17
modules/ui/workspaces/autoload/ivy.el
Normal file
17
modules/ui/workspaces/autoload/ivy.el
Normal file
@@ -0,0 +1,17 @@
|
||||
;;; ui/workspaces/autoload/ivy.el -*- lexical-binding: t; -*-
|
||||
;;;###if (modulep! :completion ivy)
|
||||
|
||||
;;;###autoload
|
||||
(defun +workspace--ivy-rich-preview (workspace)
|
||||
(if-let (buffers (when-let (workspace (gethash workspace *persp-hash*))
|
||||
(cl-loop for (type . rest) in (persp-window-conf workspace)
|
||||
if (eq type 'buffer)
|
||||
collect (car leaf)
|
||||
else if (eq type 'leaf)
|
||||
append (cl-loop for (type . leaf) in rest
|
||||
if (eq type 'buffer)
|
||||
collect (car leaf)))))
|
||||
(string-join buffers " ")
|
||||
"*No buffers*"))
|
||||
|
||||
;;; ivy.el ends here
|
Reference in New Issue
Block a user