diff options
| author | Case Duckworth | 2021-08-24 23:08:22 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-24 23:08:22 -0500 |
| commit | b777ba9f9e7087bc9a256a544a58672856034786 (patch) | |
| tree | 3048b17d400bc2a79cb26286beae301489f9ac78 /lisp | |
| parent | Add C-= back to expand-region (diff) | |
| parent | Merge branch 'main' of https://tildegit.org/acdw/emacs (diff) | |
| download | emacs-b777ba9f9e7087bc9a256a544a58672856034786.tar.gz emacs-b777ba9f9e7087bc9a256a544a58672856034786.zip | |
Merge branch 'main' of tildegit.org:acdw/emacs
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 |