diff options
| author | Case Duckworth | 2021-05-04 09:11:17 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-05-04 09:11:17 -0500 |
| commit | a274ec49c5b3b60f3837e2feaa7b15c04b772ff2 (patch) | |
| tree | 66ad9d3b49632d5b930d7d1d7800de8cfe3acf92 /lisp/acdw-modeline.el | |
| parent | Add slime-repl-return-at-end (diff) | |
| parent | Only update packages with C-u (diff) | |
| download | emacs-a274ec49c5b3b60f3837e2feaa7b15c04b772ff2.tar.gz emacs-a274ec49c5b3b60f3837e2feaa7b15c04b772ff2.zip | |
Merge branch 'main' of https://tildegit.org/acdw/emacs
Diffstat (limited to 'lisp/acdw-modeline.el')
| -rw-r--r-- | lisp/acdw-modeline.el | 5 |
1 files changed, 5 insertions, 0 deletions
| diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index 7eca143..81b808d 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el | |||
| @@ -88,4 +88,9 @@ indicator in the mode-line." | |||
| 88 | (if-let ((backend (vc-backend buffer-file-name))) | 88 | (if-let ((backend (vc-backend buffer-file-name))) |
| 89 | (substring vc-mode (+ (if (eq backend 'Hg) 2 3) 2)))) | 89 | (substring vc-mode (+ (if (eq backend 'Hg) 2 3) 2)))) |
| 90 | 90 | ||
| 91 | (defun acdw-modeline/winum () | ||
| 92 | (when (and (bound-and-true-p winum-mode) | ||
| 93 | (> winum--window-count 1)) | ||
| 94 | (format winum-format (winum-get-number-string)))) | ||
| 95 | |||
| 91 | (provide 'acdw-modeline) | 96 | (provide 'acdw-modeline) |