nitsmain

1 files changed, 5 insertions, 5 deletions

diff --git a/init.el b/init.el
index 84d5ae5..87c4f8b 100644
--- a/init.el
+++ b/init.el
@@ -1149,12 +1149,10 @@
                             (not (bound-and-true-p jao-exwm--use-afio))
                             (boundp 'exwm-workspace-current-index))
                        (format "F%s" exwm-workspace-current-index))
-                      ;; (jao-afio-use-frames "")
                       (t (format "%s" (or (jao-afio-frame-name) ""))))
                 'face 'font-lock-warning-face))
 
-  (if jao-afio-use-frames
-      (add-to-list 'global-mode-string '(:eval (jao-afio-frame-name)))
+  (unless jao-afio-use-frames
     (jao-minibuffer-add-variable '(jao-current--frame-id) 100))
 
   (setq frame-title-format '("emacs - " (:eval (jao-afio-frame-name))))
@@ -1164,7 +1162,7 @@
 
   (jao-when-darwin
    (jao-afio-add-frame-parameters "docs" (width . 195) (height . 70))
-   (jao-afio-add-frame-parameters nil (width . 163) (height . 70))
+   (jao-afio-add-frame-parameters nil (width . 197) (height . 82))
    (add-to-list 'default-frame-alist '(width . 80)))
 
   :bind (("C-c f" . 'jao-afio-goto-main)
@@ -2010,7 +2008,9 @@
       jao-kb-toggle :if jao-x11-p)]]))
 
 (global-set-key (kbd "s-w") #'jao-transient-utils)
-(global-set-key (kbd "<f4>") #'jao-transient-utils)
+
+(global-set-key (kbd "<f4>")
+                (if (display-graphic-p) #'delete-frame #'jao-transient-utils))
 
 ;;; Global key bindings
 (defun jao-global-keybindings ()