summaryrefslogtreecommitdiff
path: root/lisp/mouse-drag.el
diff options
context:
space:
mode:
authorMartin Rudalics <rudalics@gmx.at>2007-08-08 05:51:36 +0000
committerMartin Rudalics <rudalics@gmx.at>2007-08-08 05:51:36 +0000
commit70ad3da9ecdb3f7b149f78d436913f7352101093 (patch)
treea2f47f52711209786742c1ad07d7a5320095e425 /lisp/mouse-drag.el
parent1be8283dbad6cb41670cb45a2e74008ed409240b (diff)
downloademacs-70ad3da9ecdb3f7b149f78d436913f7352101093.tar.gz
Use window-full-width-p instead of comparing frame-width and
window-width.
Diffstat (limited to 'lisp/mouse-drag.el')
-rw-r--r--lisp/mouse-drag.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse-drag.el b/lisp/mouse-drag.el
index f1d56eccc66..bfb199ab897 100644
--- a/lisp/mouse-drag.el
+++ b/lisp/mouse-drag.el
@@ -158,7 +158,7 @@ Keep the cursor on the screen as needed."
Basically, we check for existing horizontal scrolling."
(or truncate-lines
(> (window-hscroll (selected-window)) 0)
- (< (window-width) (frame-width))
+ (not (window-full-width-p))
(and
mouse-drag-electric-col-scrolling
(save-excursion ;; on a long line?