Cleaning up and bug fixing.

diff --git a/obbs b/obbs
index 74734c9..4ff7187 100755 (executable)
--- a/obbs
+++ b/obbs
@@ -130,7 +130,11 @@ local function append_new_msg(obbs, conf_num, msg)
    cf:write("\tto=" .. string.format("%q", msg.to) .. ",\n")
    cf:write("\tfrom=" .. string.format("%q", msg.from) .. ",\n")
    cf:write("\tsubject=" .. string.format("%q", msg.subject) .. ",\n")
-   cf:write("\treplyto=" .. msg.replyto .. ",\n")
+
+   if msg.replyto then
+      cf:write("\treplyto=" .. msg.replyto .. ",\n")
+   end
+      
    cf:write("\tdate=" .. string.format("%q", msg.date) .. ",\n")
    cf:write("\ttime=" .. string.format("%q", msg.time) .. ",\n")
    cf:write("\ttext=" .. string.format("%q",msg.text) .. "\n")
@@ -317,15 +321,16 @@ function cmd.init ()
    if fs.exists(obbs.path .. "/conferences") or
       fs.exists(obbs.path .. "/outgoing") then
       print("One or more OBBS directories already exist. Aborting.")
-      return
+      return false
    end
 
-   fs.mkdir(obbs.path .. "conferences")
+   fs.mkdir(obbs.path .. "/conferences")
    for i,v in ipairs(obbs.conferences) do
-      fs.touch(obbs.path .. "conferences/" .. v .. ".msgs")
+      fs.touch(obbs.path .. "/conferences/" .. v .. ".msgs")
+      io.open(obbs.path .. "/conferences/" .. v .. ".next", "w"):write(1)
    end
 
-   fs.mkdir(obbs.path .. "outgoing")
+   fs.mkdir(obbs.path .. "/outgoing")
 end
 
 -- qwkout: generate QWK file