Commit 5cdf0438 authored by Raphael Cauderlier's avatar Raphael Cauderlier

[Moderation] On prend aussi le champs "Approved" pour pouvoir annuler les...

[Moderation] On prend aussi le champs "Approved" pour pouvoir annuler les messages sur crans.crans.annonces
parent eb4f22fd
......@@ -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)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment