From f36782bc24702882d9667e89ac66d1729eb0127c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 8 Jan 2001 19:12:12 +0000 Subject: (mouse-drag-should-do-col-scrolling): Change screen-width to frame-width. --- lisp/mouse-drag.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/mouse-drag.el') diff --git a/lisp/mouse-drag.el b/lisp/mouse-drag.el index 0714078fdea..9affe8b488c 100644 --- a/lisp/mouse-drag.el +++ b/lisp/mouse-drag.el @@ -157,7 +157,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) (screen-width)) + (< (window-width) (frame-width)) (and mouse-drag-electric-col-scrolling (save-excursion ;; on a long line? -- cgit v1.2.1