From 07ab9fcc0ca49ddc89b83f4b22a2a2eb6f3ccb53 Mon Sep 17 00:00:00 2001 From: yoichi Date: Thu, 3 Jun 2004 18:48:29 +0000 Subject: [PATCH] * wl-action.el (wl-summary-target-mark-set-action): Stop if marked message does not exist. --- wl/ChangeLog | 5 +++++ wl/wl-action.el | 1 + 2 files changed, 6 insertions(+) diff --git a/wl/ChangeLog b/wl/ChangeLog index 15877bb..5c3f905 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2004-06-04 Yoichi NAKAYAMA + + * wl-action.el (wl-summary-target-mark-set-action): Stop if + marked message does not exist. + 2004-06-04 Tsutomu OKADA * wl-vars.el (wl-subject-re-prefix-regexp): Renamed from diff --git a/wl/wl-action.el b/wl/wl-action.el index 9c07368..a535b0b 100644 --- a/wl/wl-action.el +++ b/wl/wl-action.el @@ -135,6 +135,7 @@ Return number if put mark succeed" (setq number (car numlist) numlist nil)) (setq numlist (cdr numlist))) + (unless number (error "no target")) (wl-summary-jump-to-msg number) (setq data (funcall (wl-summary-action-argument-function action) (wl-summary-action-symbol action) number))) -- 1.7.10.4