diff options
| author | Case Duckworth | 2021-08-24 23:01:20 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-24 23:01:20 -0500 |
| commit | da40526c8a93895b20bf7f8f292a1ace9bf9df07 (patch) | |
| tree | 3cb7856daf3690da7cfac983dabd09f956724872 /lisp | |
| parent | Change helpful-switch-to-buffer-function (diff) | |
| download | emacs-da40526c8a93895b20bf7f8f292a1ace9bf9df07.tar.gz emacs-da40526c8a93895b20bf7f8f292a1ace9bf9df07.zip | |
Setup `repeat-mode' real nice like
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/acdw.el | 13 |
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 |