[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/android f13c0464ccf: Fix typos in touch-screen.el
From: |
Po Lu |
Subject: |
feature/android f13c0464ccf: Fix typos in touch-screen.el |
Date: |
Tue, 18 Jul 2023 10:04:47 -0400 (EDT) |
branch: feature/android
commit f13c0464ccf3ab08db3cfd719fd86319dc1f3f95
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>
Fix typos in touch-screen.el
* lisp/touch-screen.el (touch-screen-handle-point-update)
(touch-screen-handle-point-up): Fix typos.
---
lisp/touch-screen.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/lisp/touch-screen.el b/lisp/touch-screen.el
index ad27c28d5f9..4c43ec4b63f 100644
--- a/lisp/touch-screen.el
+++ b/lisp/touch-screen.el
@@ -573,7 +573,7 @@ then move point to the position of POINT."
(> diff-x (frame-char-width)))
(< diff-y -10)
(and diff-x-eligible
- (< diff-x (frame-char-width))))
+ (< diff-x (- (frame-char-width)))))
(setcar (nthcdr 3 touch-screen-current-tool)
'scroll)
(setcar (nthcdr 2 touch-screen-current-tool)
@@ -686,8 +686,9 @@ is not read-only."
window (posn-window posn))
;; Select the window that was tapped given that it isn't
;; an inactive minibuffer window.
- (when (or (not (eq window)
- (minibuffer-window (window-frame window)))
+ (when (or (not (eq window
+ (minibuffer-window
+ (window-frame window))))
(minibuffer-window-active-p window))
(select-window window))
;; Now simulate a mouse click there. If there is a link
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- feature/android f13c0464ccf: Fix typos in touch-screen.el,
Po Lu <=