--- a/Lists.lua	Sat Mar 10 09:04:49 2012 -0500
+++ b/Lists.lua	Sat Mar 10 09:05:37 2012 -0500
@@ -289,8 +289,7 @@
 -- Note that "undo" has no special voodoo to it. It's basically a change that
 -- reverses the prior change on the stack.
 
--- persons list
-function bsk:DoAddPerson(change)
+function bsk:DoAddPerson(change)--{{{
     assert(change)
     assert(change.arg.id)
     local arg = change.arg
@@ -303,9 +302,8 @@
     persons.time=change.time
     personName2id[name] = id
     return true
-end
-
-function bsk:AddPerson(name)
+end--}}}
+function bsk:AddPerson(name)--{{{
     local persons = bsk.persons
     local guid = UnitGUID(name)
     -- TODO: check guid to be sure it's a player
@@ -328,18 +326,16 @@
     if bsk:DoAddPerson(change) then
         bsk:CreateChange(change)
     end
-end
-
-function bsk:DoCreateList(change)
+end--}}}
+function bsk:DoCreateList(change)--{{{
     --if bsk:GetListIndex(change.arg.name) then
     --    self:Print(sformat("List %s already exists",v.name))
     --    return false
     --end
     bsk.lists[change.arg.id]={name=change.arg.name,time=change.time}
     return true
-end
-
-function bsk:CreateList(name)
+end--}}}
+function bsk:CreateList(name)--{{{
     -- require admin
     local change={action="CreateList",arg={name=name}}
     bsk:StartChange(change)
@@ -348,9 +344,8 @@
     if bsk:DoCreateList(change) then
         bsk:CommitChange(change)
     end
-end
-
-function bsk:DoAddPersonToListEnd(change)
+end--}}}
+function bsk:DoAddPersonToListEnd(change)--{{{
     local list = bsk.lists[change.arg.listIndex]
     local index
     if getn(list) > 0 then
@@ -365,9 +360,8 @@
     list.closedRandom = true
 
     return true
-end
-
-function bsk:AddPersonToListEnd(name,listName)
+end--}}}
+function bsk:AddPersonToListEnd(name,listName)--{{{
     -- require admin
     local listIndex = bsk:GetListIndex(listName)
     local id = personName2id[name]
@@ -381,9 +375,8 @@
     if bsk:DoAddPersonToListEnd(change) then
         bsk:CommitChange(change)
     end
-end
-
-function bsk:DoAddPersonToListRandom(change)
+end--}}}
+function bsk:DoAddPersonToListRandom(change)--{{{
     local list = bsk.lists[change.arg.listIndex]
     local entry = {index=change.arg.roll, id=change.arg.id}
 
@@ -392,9 +385,8 @@
     list.time = change.time
 
     return true
-end
-
-function bsk:AddPersonToListRandom(name,listName)
+end--}}}
+function bsk:AddPersonToListRandom(name,listName)--{{{
     -- require admin
     local listIndex = bsk:GetListIndex(listName)
     if bsk.lists[listIndex].closedRandom then
@@ -413,18 +405,15 @@
     if bsk:DoAddPersonToListRandom(change) then
         bsk:CommitChange(change)
     end
-end
-
-function bsk:DoRemovePerson(change)
+end--}}}
+function bsk:DoRemovePerson(change)--{{{
 
     -- return true
-end
-
-function bsk:RemovePerson(name)
+end--}}}
+function bsk:RemovePerson(name)--{{{
     -- from both persons and lists
-end
-
-function bsk:DoSuicidePerson(change)
+end--}}}
+function bsk:DoSuicidePerson(change)--{{{
     local list = bsk.lists[change.arg.listIndex]
     local affected = shallowCopy(change.arg.affect)
     -- the goal here is to rotate the suicide list by 1
@@ -445,9 +434,8 @@
     end
     list.time=change.time
     return true
-end
-
-function bsk:SuicidePerson(name,listName)
+end--}}}
+function bsk:SuicidePerson(name,listName)--{{{
     -- require admin
     bsk:PopulateRaidList()
     local listIndex = bsk:GetListIndex(listName)
@@ -458,15 +446,13 @@
     if bsk:DoSuicidePerson(change) then
        bsk:CommitChange(change)
     end
-end
-
-function bsk:DoRenameList(change)
+end--}}}
+function bsk:DoRenameList(change)--{{{
     bsk.lists[change.arg.listIndex].name = change.arg.name
     bsk.lists[change.arg.listIndex].time = change.time
     return true
-end
-
-function bsk:RenameList(listName,newListName)
+end--}}}
+function bsk:RenameList(listName,newListName)--{{{
     -- require admin
     local listIndex = bsk:GetListIndex(listName)
     local change = {action="RenameList",arg={listIndex=listIndex,name=newListName}}
@@ -474,23 +460,20 @@
     if bsk:DoRenameList(change) then
        bsk:CommitChange(change)
     end
-end
-
-function bsk:DoDeleteList(change)
+end--}}}
+function bsk:DoDeleteList(change)--{{{
     bsk.lists[change.arg.listIndex] = nil
     return true
-end
-
-function bsk:DeleteList(listName)
+end--}}}
+function bsk:DeleteList(listName)--{{{
     local listIndex = bsk:GetListIndex(listName)
     local change = {action="DeleteList",arg={listIndex=listIndex}}
     bsk:StartChange(change)
     if bsk:DoDeleteList(change) then
        bsk:CommitChange(change)
     end
-end
-
-function bsk:DoRemovePersonFromList(change)
+end--}}}
+function bsk:DoRemovePersonFromList(change)--{{{
     local list = bsk.lists[change.arg.listIndex]
 
     for i,v in pairs(list) do
@@ -502,9 +485,8 @@
     table.sort(list,function(a,b) return a.index < b.index end)
     list.time = change.time
     return true
-end
-
-function bsk:RemovePersonFromList(name,listName)
+end--}}}
+function bsk:RemovePersonFromList(name,listName)--{{{
     local listIndex = bsk:GetListIndex(listName)
     local pid = personName2id[name]
     local change = {action="RemovePersonFromList",arg={id=pid,listIndex=listIndex}}
@@ -514,6 +496,7 @@
     end
 end
 --}}}
+--}}}
 -- Higher order actions (ie calls other standard actions){{{
 
 function bsk:TrimLists(time)