forgot 'next' in dir check

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@137 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/src/core.pl b/src/core.pl
index c710bc54ed060dfb3e148ea8f2b9b4df32a2cd68..567852c96683233dc8f9e6634543662e77df45e9 100644 (file)
--- a/src/core.pl
+++ b/src/core.pl
@@ -149,8 +149,10 @@ sub setup {
     &openLog();                # write, append.
 
     foreach ("debian","Temp") {
+       my $dir = "$bot_base_dir/$_/";
+       next if ( -d $dir);
        &status("Making dir $_");
-       mkdir "$bot_base_dir/$_/", 0755;
+       mkdir $dir, 0755;
     }
 
     # read.