diff --git a/news/moderation.el b/news/moderation.el
index 18ef6839..d002fd44 100644
--- a/news/moderation.el
+++ b/news/moderation.el
@@ -52,6 +52,8 @@
   (interactive)
   (unless (message-news-p)
     (error "Il n'est pas possible d'annuler cet article"))
+  (unless (not (eq (user-uid) 0))
+    (error "Ce script ne se lance pas en tant que root"))
   (let (from newsgroups message-id distribution origbuf buf subject)
     (setq origbuf (buffer-name))
     (save-excursion