added check for dirs on startup

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

diff --git a/src/core.pl b/src/core.pl
index 42a1ca81e9d8e4e2136a73ba56c9751502fa5d60..c710bc54ed060dfb3e148ea8f2b9b4df32a2cd68 100644 (file)
--- a/src/core.pl
+++ b/src/core.pl
@@ -148,6 +148,11 @@ sub setup {
     &showProc(" (\&openLog before)");
     &openLog();                # write, append.
 
+    foreach ("debian","Temp") {
+       &status("Making dir $_");
+       mkdir "$bot_base_dir/$_/", 0755;
+    }
+
     # read.
     &loadIgnore($bot_misc_dir.         "/blootbot.ignore");
     &loadLang($bot_misc_dir.           "/blootbot.lang");