[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ace-window 88e48db 56/92: ace-window.el: Fix leading ch
From: |
Stefan Monnier |
Subject: |
[elpa] externals/ace-window 88e48db 56/92: ace-window.el: Fix leading char not displayed if the face height isn't 1.0 |
Date: |
Wed, 17 Mar 2021 18:39:21 -0400 (EDT) |
branch: externals/ace-window
commit 88e48db56a176363121058b15b965324dc8e92c9
Author: Oleh Krehel <ohwoeowho@gmail.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>
ace-window.el: Fix leading char not displayed if the face height isn't 1.0
Fixes #145
---
ace-window.el | 15 +++++++++++++--
1 file changed, 13 insertions(+), 2 deletions(-)
diff --git a/ace-window.el b/ace-window.el
index 3ba0cb8..c0fedfc 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -751,6 +751,16 @@ Modify `aw-fair-aspect-ratio' to tweak behavior."
(aw--switch-buffer)
(aw-flip-window))
+(defun aw--face-rel-height ()
+ (let ((h (face-attribute 'aw-leading-char-face :height)))
+ (cond
+ ((eq h 'unspecified)
+ 1)
+ ((floatp h)
+ (1+ (floor h)))
+ (t
+ (error "unexpected: %s" h)))))
+
(defun aw-offset (window)
"Return point in WINDOW that's closest to top left corner.
The point is writable, i.e. it's not part of space after newline."
@@ -758,10 +768,11 @@ The point is writable, i.e. it's not part of space after
newline."
(beg (window-start window))
(end (window-end window))
(inhibit-field-text-motion t))
- (with-current-buffer
- (window-buffer window)
+ (with-current-buffer (window-buffer window)
(save-excursion
(goto-char beg)
+ (when (member major-mode '(shell-mode))
+ (forward-line (- (aw--face-rel-height) 1)))
(while (and (< (point) end)
(< (- (line-end-position)
(line-beginning-position))
- [elpa] externals/ace-window 5b88de0 49/92: ace-window.el (aw-translate-char-function): New defcustom, (continued)
- [elpa] externals/ace-window 5b88de0 49/92: ace-window.el (aw-translate-char-function): New defcustom, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window f0da12d 71/92: Readme.md: Add copy window to both action lists, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window edbbb1b 86/92: ace-window.el (ace-window): Extend doc, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 196382b 78/92: ace-window.el (aw-display-mode-overlay): New defcustom, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window cd82d83 77/92: Use call-interactively if the callee function is a command, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 138a80c 83/92: ace-window.el (aw--lead-overlay): Fix double recenter problem, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 7003c88 91/92: ace-window.el: Bump version, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window d93e16b 48/92: ace-window.el: Fix frame-parameter being a cons sometimes, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 2e3b956 53/92: ace-window.el (aw-ignored-p): Ignore child frames, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window a2f1dd5 61/92: ace-window.el (aw--face-rel-height): Fix for int height, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 88e48db 56/92: ace-window.el: Fix leading char not displayed if the face height isn't 1.0,
Stefan Monnier <=
- [elpa] externals/ace-window c963bb9 79/92: ace-window.el: Fix compiler warning, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window b93380c 90/92: ace-window.el: Remove obsolete variables, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 702bc27 45/92: Show the overlay in the bottom of the window too, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 746ffd2 52/92: ace-window.el (aw-ignored-buffers): Clean up doc, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 2307fd1 64/92: ace-window.el (aw-dispatch-alist): Don't bind anything on home row, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 379413c 60/92: ace-window.el (aw-offset): Update, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 9ca16c6 62/92: Fix aw-switch-buffer-other-window bug, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window 58463b4 67/92: ace-window.el (aw-select): Fix when selecting from an ignored window, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window d0a5559 66/92: ace-window.el (ace-window): M-0 should not modify aw-ignore-on permanently, Stefan Monnier, 2021/03/17
- [elpa] externals/ace-window d20bd7c 59/92: ace-window.el (aw-delete-window): Add optional kill-buffer arg, Stefan Monnier, 2021/03/17