From 8277aa9a71655909af8860ec0f6142c1d93e2cfc Mon Sep 17 00:00:00 2001
From: John Sigman <john.sigman@gmail.com>
Date: Mon, 16 Sep 2024 13:02:09 -0400
Subject: [PATCH] maximized on linux, fullscreen on macos

---
 init.org | 21 +++++++++++++++------
 1 file changed, 15 insertions(+), 6 deletions(-)

diff --git a/init.org b/init.org
index 9a3c289..d2571d3 100644
--- a/init.org
+++ b/init.org
@@ -56,13 +56,22 @@ I'll do this first, so that it goes back to this when I exit full screen mode (i
 #+end_src
 *** Full Screen
 #+begin_src emacs-lisp :load yes
-(defun toggle-fullscreen ()
-  "Toggle full screen."
+(defun toggle-fullscreen-or-maximized ()
+  "Toggle between fullscreen on macOS and maximized on Linux."
   (interactive)
-  (set-frame-parameter
-   nil 'fullscreen
-   (if (frame-parameter nil 'fullscreen) nil 'fullboth)))
-(add-hook 'window-setup-hook #'toggle-fullscreen)
+  (if (eq system-type 'darwin) ; macOS
+      (set-frame-parameter
+       nil 'fullscreen
+       (if (frame-parameter nil 'fullscreen)
+           nil
+         'fullboth))
+    (set-frame-parameter
+     nil 'fullscreen
+     (if (eq (frame-parameter nil 'fullscreen) 'maximized)
+         nil
+       'maximized)))) ; Linux
+
+(add-hook 'window-setup-hook #'toggle-fullscreen-or-maximized)
 #+end_src
 ** Copying syntax highlighting to the clipboard
 #+begin_src  emacs-lisp :load yes