From 5cdf0438269a531dd0d040573bebed17587ad13b Mon Sep 17 00:00:00 2001 From: Raphael Cauderlier Date: Thu, 13 Mar 2014 18:50:17 +0100 Subject: [PATCH] [Moderation] On prend aussi le champs "Approved" pour pouvoir annuler les messages sur crans.crans.annonces --- news/moderation.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/news/moderation.el b/news/moderation.el index 0823a57e..321d190c 100644 --- a/news/moderation.el +++ b/news/moderation.el @@ -58,7 +58,8 @@ newsgroups (message-fetch-field "newsgroups") subject (message-fetch-field "subject") message-id (message-fetch-field "message-id" t) - distribution (message-fetch-field "distribution"))) + distribution (message-fetch-field "distribution") + approved (message-fetch-field "approved"))) ;; Make sure that this article was written by the user. (unless (message-is-yours-p) (error "Impossible d'annuler cet article")) @@ -73,6 +74,9 @@ (if distribution (concat "Distribution: " distribution "\n") "") + (if approved + (concat "Approved: " approved "\n") + "") mail-header-separator "\n" message-cancel-message)