From 8a81d3a3caef0f94f9721361a749f0b6429f30ce Mon Sep 17 00:00:00 2001 From: teranisi Date: Tue, 10 Feb 2004 13:29:29 +0000 Subject: [PATCH] * wl-dnd.el (wl-dnd-drop-func): Fix. * wl-message.el (wl-message-header-narrowing-widen-at-mouse): Use mouse-set-point instead of posn-point. --- wl/ChangeLog | 5 +++++ wl/wl-dnd.el | 2 +- wl/wl-message.el | 2 +- 3 files changed, 7 insertions(+), 2 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index c7ef76b..67acd41 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,5 +1,10 @@ 2004-02-10 Yuuichi Teranishi + * wl-dnd.el (wl-dnd-drop-func): Fix. + + * wl-message.el (wl-message-header-narrowing-widen-at-mouse): Use + mouse-set-point instead of posn-point. + * wl-xmas.el (wl-completing-read-multiple): Define as function. * wl-mule.el (wl-completing-read-multiple): Ditto. diff --git a/wl/wl-dnd.el b/wl/wl-dnd.el index 59402d9..10a3502 100644 --- a/wl/wl-dnd.el +++ b/wl/wl-dnd.el @@ -71,7 +71,7 @@ (set-buffer (wl-summary-get-buffer src-fld)) (save-match-data (wl-summary-jump-to-msg number)) - (wl-summary-refile target number) + (funcall (symbol-function 'wl-summary-refile) number target) (select-window (get-buffer-window (current-buffer))) )) t) diff --git a/wl/wl-message.el b/wl/wl-message.el index 25ec645..df44ae3 100644 --- a/wl/wl-message.el +++ b/wl/wl-message.el @@ -861,7 +861,7 @@ Returns non-nil if bottom of message." (select-window (posn-window (event-start event))) (let* ((win (selected-window)) (wpos (window-start win)) - (pos (posn-point (event-start event))) + (pos (mouse-set-point event)) (ovs (overlays-in (1- pos) (1+ pos))) ;; Uum... ov) (while (and ovs (not (overlayp ov))) -- 1.7.10.4