1 files changed, 13 insertions, 0 deletions

@@ -566,5 +566,18 @@ It's called 'require-private' for historical reasons."
       (forward-sexp 2)
     ('scan-error (end-of-buffer))))
 
+
+;;; Crux tweaks
+
+;; `crux-other-window-or-switch-buffer' doesn't take an argument.
+(defun acdw/other-window-or-switch-buffer (&optional arg)
+  "Call `other-window' or switch buffers, depending on window count."
+  (interactive "P")
+  (if (one-window-p)
+      (switch-to-buffer nil)
+    (other-window (or arg 1))))
+
+
+
 (provide 'acdw)
 ;;; acdw.el ends here