Update documentation from upstream.

[usenet/usevote.git] / UVreadmail.pm

diff --git a/UVreadmail.pm b/UVreadmail.pm
index ac1b843..0a1f98f 100644 (file)
--- a/UVreadmail.pm
+++ b/UVreadmail.pm
@@ -145,6 +145,7 @@ sub process {
                 access => 'rw',
                 type   => $config{mailboxtype},
                 expand => 'LAZY',
                 access => 'rw',
                 type   => $config{mailboxtype},
                 expand => 'LAZY',

+                remove_when_empty => 0,

               );
     };
     die UVmessage::get("READMAIL_NOMAILFILE", (FILE => $readfilename)) . "\n\n" if $@;
               );
     };
     die UVmessage::get("READMAIL_NOMAILFILE", (FILE => $readfilename)) . "\n\n" if $@;


@@ -161,7 +162,7 @@ sub process {
       } else {
         $fromline .= 'foo@bar.invalid';
       }
       } else {
         $fromline .= 'foo@bar.invalid';
       }

-      $fromline .= ' ' . localtime() . "\n";  #strftime ('%a %b %d %H:%M:%S %Y', localtime) . "\n";
+      $fromline .= ' ' . localtime($_->timestamp()) . "\n";

       push (@mails, $fromline . $mail);
     }
   }
       push (@mails, $fromline . $mail);
     }
   }