diff options
author | Case Duckworth | 2021-08-29 10:37:15 -0500 |
---|---|---|
committer | Case Duckworth | 2021-08-29 10:37:15 -0500 |
commit | 33afd74544b69900435746be987990e5d60b03dd (patch) | |
tree | 722047f68bbced7f652ae02e03db2e34cbd5a6e7 | |
parent | Change circe nick formatting (diff) | |
download | emacs-33afd74544b69900435746be987990e5d60b03dd.tar.gz emacs-33afd74544b69900435746be987990e5d60b03dd.zip |
Properly detect edit-server frames
-rw-r--r-- | init.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/init.el b/init.el index 08f3381..d075bef 100644 --- a/init.el +++ b/init.el | |||
@@ -1351,7 +1351,10 @@ like a dumbass." | |||
1351 | (when (and (daemonp) | 1351 | (when (and (daemonp) |
1352 | (require 'edit-server nil :noerror)) | 1352 | (require 'edit-server nil :noerror)) |
1353 | (edit-server-start) | 1353 | (edit-server-start) |
1354 | (add-hook 'edit-server-done-hook #'unfill-buffer))) | 1354 | |
1355 | (advice-add 'edit-server-make-frame :before | ||
1356 | (defun edit-server@set-a-variable (&rest _) | ||
1357 | (setq edit-server-frame-p t))))) | ||
1355 | 1358 | ||
1356 | (setup (:straight (electric-cursor | 1359 | (setup (:straight (electric-cursor |
1357 | :host github | 1360 | :host github |
@@ -2026,7 +2029,7 @@ call `zzz-to-char'." | |||
2026 | 2029 | ||
2027 | (add-hook 'after-make-frame-functions | 2030 | (add-hook 'after-make-frame-functions |
2028 | (defun after-make-frame@maximize (frame) | 2031 | (defun after-make-frame@maximize (frame) |
2029 | (unless (or edit-server-edit-mode) | 2032 | (unless (bound-and-true-p edit-server-frame-p) |
2030 | (toggle-frame-maximized frame))))) | 2033 | (toggle-frame-maximized frame))))) |
2031 | 2034 | ||
2032 | ;;;; Work | 2035 | ;;;; Work |