diff options
| author | Glenn Morris | 2018-06-18 12:14:26 -0700 |
|---|---|---|
| committer | Glenn Morris | 2018-06-18 12:14:26 -0700 |
| commit | 988b53ed2d3287f7ee9cfa4225765a97a245c133 (patch) | |
| tree | dca2fd0df6dea6b5400ea099facc1298ba1eba64 | |
| parent | 2f477cbe7f7754c08e00b2b8bdceb2bc1a836db3 (diff) | |
| parent | ebe065fddf76fde64a9c07b419b67fe47fb6c1cb (diff) | |
| download | emacs-988b53ed2d3287f7ee9cfa4225765a97a245c133.tar.gz emacs-988b53ed2d3287f7ee9cfa4225765a97a245c133.zip | |
Merge from origin/emacs-26
ebe065f Prevent errant scroll on mouse click (Bug#31546)
ffd2018 Minor documentation fix
cf4dc95 * lisp/window.el (window-toggle-side-windows): Doc fix. (Bug...
| -rw-r--r-- | doc/lispref/windows.texi | 4 | ||||
| -rw-r--r-- | lisp/mouse.el | 6 | ||||
| -rw-r--r-- | lisp/window.el | 15 | ||||
| -rw-r--r-- | src/nsterm.m | 2 |
4 files changed, 17 insertions, 10 deletions
diff --git a/doc/lispref/windows.texi b/doc/lispref/windows.texi index 315ffd4f484..54977595956 100644 --- a/doc/lispref/windows.texi +++ b/doc/lispref/windows.texi | |||
| @@ -3730,6 +3730,7 @@ argument @var{window}, then returns its result. | |||
| 3730 | @end defun | 3730 | @end defun |
| 3731 | 3731 | ||
| 3732 | @cindex window end position | 3732 | @cindex window end position |
| 3733 | @cindex last visible position in a window | ||
| 3733 | @defun window-end &optional window update | 3734 | @defun window-end &optional window update |
| 3734 | This function returns the position where display of its buffer ends in | 3735 | This function returns the position where display of its buffer ends in |
| 3735 | @var{window}. The default for @var{window} is the selected window. | 3736 | @var{window}. The default for @var{window} is the selected window. |
| @@ -3752,7 +3753,8 @@ Even if @var{update} is non-@code{nil}, @code{window-end} does not | |||
| 3752 | attempt to scroll the display if point has moved off the screen, the | 3753 | attempt to scroll the display if point has moved off the screen, the |
| 3753 | way real redisplay would do. It does not alter the | 3754 | way real redisplay would do. It does not alter the |
| 3754 | @code{window-start} value. In effect, it reports where the displayed | 3755 | @code{window-start} value. In effect, it reports where the displayed |
| 3755 | text will end if scrolling is not required. | 3756 | text will end if scrolling is not required. Note that the position it |
| 3757 | returns might be only partially visible. | ||
| 3756 | @end defun | 3758 | @end defun |
| 3757 | 3759 | ||
| 3758 | @vindex window-group-end-function | 3760 | @vindex window-group-end-function |
diff --git a/lisp/mouse.el b/lisp/mouse.el index 95aada9b155..693fc0284f2 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -1219,7 +1219,11 @@ The region will be defined with mark and point." | |||
| 1219 | (bounds (window-edges start-window)) | 1219 | (bounds (window-edges start-window)) |
| 1220 | (make-cursor-line-fully-visible nil) | 1220 | (make-cursor-line-fully-visible nil) |
| 1221 | (top (nth 1 bounds)) | 1221 | (top (nth 1 bounds)) |
| 1222 | (bottom (if (window-minibuffer-p start-window) | 1222 | (bottom (if (or (window-minibuffer-p start-window) |
| 1223 | ;; Do not account for the mode line if there | ||
| 1224 | ;; is no mode line, which is common for child | ||
| 1225 | ;; frames. | ||
| 1226 | (not mode-line-format)) | ||
| 1223 | (nth 3 bounds) | 1227 | (nth 3 bounds) |
| 1224 | ;; Don't count the mode line. | 1228 | ;; Don't count the mode line. |
| 1225 | (1- (nth 3 bounds)))) | 1229 | (1- (nth 3 bounds)))) |
diff --git a/lisp/window.el b/lisp/window.el index 085e51646f8..fdd510401da 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -1144,15 +1144,16 @@ explicitly provided via a `window-parameters' entry in ALIST." | |||
| 1144 | buffer best-window 'reuse alist dedicated))))))))) | 1144 | buffer best-window 'reuse alist dedicated))))))))) |
| 1145 | 1145 | ||
| 1146 | (defun window-toggle-side-windows (&optional frame) | 1146 | (defun window-toggle-side-windows (&optional frame) |
| 1147 | "Toggle side windows on specified FRAME. | 1147 | "Toggle display of side windows on specified FRAME. |
| 1148 | FRAME must be a live frame and defaults to the selected one. | 1148 | FRAME must be a live frame and defaults to the selected one. |
| 1149 | 1149 | ||
| 1150 | If FRAME has at least one side window, save FRAME's state in the | 1150 | If FRAME has at least one side window, delete all side |
| 1151 | FRAME's `window-state' frame parameter and delete all side | 1151 | windows on FRAME after saving FRAME's state in the |
| 1152 | windows on FRAME afterwards. Otherwise, if FRAME has a | 1152 | FRAME's `window-state' frame parameter. Otherwise, |
| 1153 | `window-state' parameter, use that to restore any side windows on | 1153 | restore any side windows recorded in FRAME's `window-state' |
| 1154 | FRAME leaving FRAME's main window alone. Signal an error if | 1154 | parameter, leaving FRAME's main window alone. Signal an |
| 1155 | FRAME has no side window and no saved state is found." | 1155 | error if FRAME has no side windows and no saved state for |
| 1156 | it is found." | ||
| 1156 | (interactive) | 1157 | (interactive) |
| 1157 | (let* ((frame (window-normalize-frame frame)) | 1158 | (let* ((frame (window-normalize-frame frame)) |
| 1158 | (window--sides-inhibit-check t) | 1159 | (window--sides-inhibit-check t) |
diff --git a/src/nsterm.m b/src/nsterm.m index f0e6790e99e..a15684d3bf2 100644 --- a/src/nsterm.m +++ b/src/nsterm.m | |||
| @@ -2603,7 +2603,7 @@ ns_mouse_position (struct frame **fp, int insist, Lisp_Object *bar_window, | |||
| 2603 | 2603 | ||
| 2604 | if (f && FRAME_NS_P (f)) | 2604 | if (f && FRAME_NS_P (f)) |
| 2605 | { | 2605 | { |
| 2606 | view = FRAME_NS_VIEW (*fp); | 2606 | view = FRAME_NS_VIEW (f); |
| 2607 | 2607 | ||
| 2608 | position = [[view window] mouseLocationOutsideOfEventStream]; | 2608 | position = [[view window] mouseLocationOutsideOfEventStream]; |
| 2609 | position = [view convertPoint: position fromView: nil]; | 2609 | position = [view convertPoint: position fromView: nil]; |