diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2005-09-06 19:10:06 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2005-09-06 19:10:06 +0000 |
commit | efe4e5af8a7c28b184090939e35f312d9bded3f3 (patch) | |
tree | 1b96188d58eed6dcf9c08841145fd5275f16f03b /lisp/mouse.el | |
parent | 9655b4049320773197f466b159189a731218902f (diff) | |
download | emacs-efe4e5af8a7c28b184090939e35f312d9bded3f3.tar.gz |
*** empty log message ***
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r-- | lisp/mouse.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index c928e04f8ed..1970fbf1eeb 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -538,11 +538,10 @@ resized by dragging their header-line." (window (posn-window start)) (frame (window-frame window)) (first-window (frame-first-window frame))) - (when (or (eq window first-window) - (= (nth 1 (window-edges window)) - (nth 1 (window-edges first-window)))) - (error "Cannot move header-line at the top of the frame")) - (mouse-drag-mode-line-1 start-event nil))) + (unless (or (eq window first-window) + (= (nth 1 (window-edges window)) + (nth 1 (window-edges first-window)))) + (mouse-drag-mode-line-1 start-event nil)))) (defun mouse-drag-vertical-line (start-event) |