mkdir before we change $file{log}

[infobot.git] / src / logger.pl

diff --git a/src/logger.pl b/src/logger.pl
index ab5a416d0ef48e86f345735d5f933d3d5f605bfd..3ad021abcbd4953a473ab38051d46151c5d876ef 100644 (file)
--- a/src/logger.pl
+++ b/src/logger.pl
@@ -112,13 +112,13 @@ sub openLog {
 
     if ( &IsParam('logType') and $param{'logType'} =~ /DAILY/i ) {
         my ( $day, $month, $year ) = ( gmtime time() )[ 3, 4, 5 ];
-        $logDate = sprintf('%04d/%02d%02d', $year + 1900, $month + 1, $day);
-        $file{log} .= $logDate;
        my $logDir = $file{log} . sprintf('%04d', $year + 1900);
         unless(-d $logDir) {
             &status("openLog: making $logDir.");
             mkdir $logDir, 0755 or &status("Cannot mkdir $logDir");;
         }
+        $logDate = sprintf('%04d/%02d%02d', $year + 1900, $month + 1, $day);
+        $file{log} .= $logDate;
     }