summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
authorCase Duckworth2021-08-24 23:01:20 -0500
committerCase Duckworth2021-08-24 23:01:20 -0500
commitda40526c8a93895b20bf7f8f292a1ace9bf9df07 (patch)
tree3cb7856daf3690da7cfac983dabd09f956724872 /lisp
parentChange helpful-switch-to-buffer-function (diff)
downloademacs-da40526c8a93895b20bf7f8f292a1ace9bf9df07.tar.gz
emacs-da40526c8a93895b20bf7f8f292a1ace9bf9df07.zip
Setup `repeat-mode' real nice like
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw.el13
1 files changed, 13 insertions, 0 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index 7e82a9a..bd64af3 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el
@@ -566,5 +566,18 @@ It's called 'require-private' for historical reasons."
566 (forward-sexp 2) 566 (forward-sexp 2)
567 ('scan-error (end-of-buffer)))) 567 ('scan-error (end-of-buffer))))
568 568
569
570;;; Crux tweaks
571
572;; `crux-other-window-or-switch-buffer' doesn't take an argument.
573(defun acdw/other-window-or-switch-buffer (&optional arg)
574 "Call `other-window' or switch buffers, depending on window count."
575 (interactive "P")
576 (if (one-window-p)
577 (switch-to-buffer nil)
578 (other-window (or arg 1))))
579
580
581
569(provide 'acdw) 582(provide 'acdw)
570;;; acdw.el ends here 583;;; acdw.el ends here