[mhonarc] make mhonarc quiet

[Olav Vitters <ovitters src gnome org>]

commit 027dc1fa8dceb1dadd66307985a39f7b6fba7a32
Author: Olav Vitters <olav vitters nl>
Date:   Thu Feb 14 09:45:56 2013 +0100

    make mhonarc quiet

 archive.pl |    2 +-
 archive.py |    5 +++--
 2 files changed, 4 insertions(+), 3 deletions(-)
---
diff --git a/archive.pl b/archive.pl
index 2f4ebd8..b9ae1be 100755
--- a/archive.pl
+++ b/archive.pl
@@ -55,7 +55,7 @@ sub output {
   $rcfile = $self->{private} ? $PRIVATE_RCFILE : $PUBLIC_RCFILE;
 
   system (<<EOT);
-mhonarc -umask 022 -rcfile $rcfile -add -outdir $dir $tmpname -definevar "ARCHDATE=$self->{olddir} 
LISTNAME=$self->{listname}" >> /var/log/mailman/archive 2>&1 
+mhonarc -umask 022 -quiet -rcfile $rcfile -add -outdir $dir $tmpname -definevar "ARCHDATE=$self->{olddir} 
LISTNAME=$self->{listname}" >> /var/log/mailman/archive 2>&1 
 EOT
 
   if (-f "$dir.txt") {
diff --git a/archive.py b/archive.py
index 5159363..221bf79 100755
--- a/archive.py
+++ b/archive.py
@@ -106,8 +106,9 @@ class Archiver:
             # Call mhonarc for all messages in 'newmsgs'
             with open(self.ERRORLOG, "ab") as error_fd:
                 newmsgs.flush()
-                cmd = ['mhonarc', '-umask', '022', '-rcfile', rcfile, '-add', '-outdir', path, newmsgs.name,
-                                  '-definevar', 'ARCHDATE=%s LISTNAME=%s' % (archivepath, self.listname)]
+                cmd = ['mhonarc', '-umask', '022', '-rcfile', rcfile, '-add', '-outdir', path,
+                                  '-definevar', 'ARCHDATE=%s LISTNAME=%s' % (archivepath, self.listname),
+                                  '-quiet', newmsgs.name]
 
                 subprocess.call(cmd, stdout=error_fd, stderr=subprocess.STDOUT)