[siesta-commit] siesta/bin nacho,1.33,1.34

[prev] [thread] [next] [lurker] [Date index for 2002/10/01]

From: clampr
Subject: [siesta-commit] siesta/bin nacho,1.33,1.34
Date: 11:12 on 01 Oct 2002
Update of /cvsroot/siesta/siesta/bin
In directory usw-pr-cvs1:/tmp/cvs-serv7151/bin

Modified Files:
	nacho 
Log Message:
perltidy

Index: nacho
===================================================================
RCS file: /cvsroot/siesta/siesta/bin/nacho,v
retrieving revision 1.33
retrieving revision 1.34
diff -u -d -r1.33 -r1.34
--- nacho	1 Oct 2002 09:54:51 -0000	1.33
+++ nacho	1 Oct 2002 10:12:00 -0000	1.34
@@ -26,7 +26,7 @@
   set-plugin-config-user
   set-plugin-config-list
   set-plugin-config-userlist
-               run-mhonarc
+  run-mhonarc
   );
 
 # not enough arguments
@@ -814,16 +814,15 @@
 =cut
 
 sub run_mhonarc {
-    $ENV{M2H_PATTERN} = '^[^\.]';
+    $ENV{M2H_PATTERN}  = '^[^\.]';
     $ENV{M2H_SPAMMODE} = 1;
     for my $list ( map { $_->id } Siesta->storage->get_lists ) {
-        my $input = $Siesta::Config::ARCHIVE . "/$list";
+        my $input  = $Siesta::Config::ARCHIVE . "/$list";
         my $output = $Siesta::Config::ROOT . "/html/$list";
         mkpath($output);
         system qq{ mhonarc -outdir $output $input/cur/* $input/new/* };
     }
 }
-
 
 sub usage {
     ( my $name = $0 ) =~ s!^.*[\\/]!!;



Generated at 13:57 on 01 Jul 2004 by mariachi 0.52