diff options
| author | Martin Rudalics <rudalics@gmx.at> | 2007-08-08 05:51:36 +0000 |
|---|---|---|
| committer | Martin Rudalics <rudalics@gmx.at> | 2007-08-08 05:51:36 +0000 |
| commit | 70ad3da9ecdb3f7b149f78d436913f7352101093 (patch) | |
| tree | a2f47f52711209786742c1ad07d7a5320095e425 /lisp/mouse-drag.el | |
| parent | 1be8283dbad6cb41670cb45a2e74008ed409240b (diff) | |
| download | emacs-70ad3da9ecdb3f7b149f78d436913f7352101093.tar.gz emacs-70ad3da9ecdb3f7b149f78d436913f7352101093.tar.bz2 emacs-70ad3da9ecdb3f7b149f78d436913f7352101093.zip | |
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.el | 2 |
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? |