diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mouse.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 9a3e2235ece..5c9056fb43d 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -1225,7 +1225,11 @@ The region will be defined with mark and point." | |||
| 1225 | (bounds (window-edges start-window)) | 1225 | (bounds (window-edges start-window)) |
| 1226 | (make-cursor-line-fully-visible nil) | 1226 | (make-cursor-line-fully-visible nil) |
| 1227 | (top (nth 1 bounds)) | 1227 | (top (nth 1 bounds)) |
| 1228 | (bottom (if (window-minibuffer-p start-window) | 1228 | (bottom (if (or (window-minibuffer-p start-window) |
| 1229 | ;; Do not account for the mode line if there | ||
| 1230 | ;; is no mode line, which is common for child | ||
| 1231 | ;; frames. | ||
| 1232 | (not mode-line-format)) | ||
| 1229 | (nth 3 bounds) | 1233 | (nth 3 bounds) |
| 1230 | ;; Don't count the mode line. | 1234 | ;; Don't count the mode line. |
| 1231 | (1- (nth 3 bounds)))) | 1235 | (1- (nth 3 bounds)))) |