diff options
Diffstat (limited to 'lisp/textmodes/two-column.el')
-rw-r--r-- | lisp/textmodes/two-column.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/textmodes/two-column.el b/lisp/textmodes/two-column.el index 0e95284b27d..8cbe801fc40 100644 --- a/lisp/textmodes/two-column.el +++ b/lisp/textmodes/two-column.el @@ -580,10 +580,10 @@ on, this also realigns the two buffers." ;; catch a mouse scroll on non-selected scrollbar (select-window (prog1 (selected-window) - (and (consp last-command-char) + (and (consp last-command-event) (not (eq (selected-window) - (car (car (cdr last-command-char))))) - (select-window (car (car (cdr last-command-char))))) + (car (car (cdr last-command-event))))) + (select-window (car (car (cdr last-command-event))))) ;; In some cases scrolling causes an error, but post-command-hook ;; shouldn't, and should always stay in the original window (condition-case () |