# HG changeset patch
# User Alex Schroeder <alex@gnu.org>
# Date 1141197519 0
# Node ID f2334bdf1c2eb4721f0130e1dcddbf550e3654a5
# Parent  da4ae7e898f60753718acc1057a518aa9b13f390
(rmail-summary-kill-label): Use rmail-kill-label
instead of calling rmail-set-label, which will call
rmail-make-label on the string.

diff -r da4ae7e898f6 -r f2334bdf1c2e lisp/mail/rmailsum.el
--- a/lisp/mail/rmailsum.el	Wed Mar 01 07:10:01 2006 +0000
+++ b/lisp/mail/rmailsum.el	Wed Mar 01 07:18:39 2006 +0000
@@ -1166,7 +1166,7 @@
   (interactive (list (with-current-buffer rmail-buffer
 		       (rmail-read-label "Kill label" t))))
   (with-current-buffer rmail-buffer
-    (rmail-set-label label nil)))
+    (rmail-kill-label label nil)))
 
 ;;;; *** Rmail Summary Mailing Commands ***