From bb7162a9e9b5fb500ea549d9590f6f427ea42b49 Mon Sep 17 00:00:00 2001 From: KemoNine Date: Wed, 12 Apr 2023 18:18:53 -0400 Subject: [PATCH] add way to open scratch buffer frame with a prompt on major mode to use --- common/workspaces.el | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/common/workspaces.el b/common/workspaces.el index 2e38d0e..6d0364e 100644 --- a/common/workspaces.el +++ b/common/workspaces.el @@ -141,3 +141,14 @@ (scratch 'text-mode) ) ) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +; scratch buffers frame, prompt for initial mode - use 'scratch and prompts to manage as needed +(defun kmn/workspace-frame-scratch-prompt() + (interactive) + (let ((frame (make-frame))) + (select-frame-set-input-focus frame) + (delete-other-windows) + (scratch (let ((current-prefix-arg t)) (scratch--buffer-querymode))) + ) +)