diff --git a/src/Dodge/Data/SelectionList.hs b/src/Dodge/Data/SelectionList.hs
index 21acdad4b..9446a070d 100644
--- a/src/Dodge/Data/SelectionList.hs
+++ b/src/Dodge/Data/SelectionList.hs
@@ -30,6 +30,14 @@ data SelectionList a = SelectionList
     }
     --deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
+-- this is projected to be VERY arbitrary: the fssFilters point to the lower of
+-- a pair of ints (i,i+1) such that the lower is the regex section, the higher
+-- is the items section.
+data FilterableSections a = FilterableSections
+    { _fssFilters :: IntMap (Maybe String)
+    , _fssSections :: SelectionSections a
+    }
+
 data SelectionSections a = SelectionSections
     { _sssSections :: IntMap (SelectionSection a)
     , _sssSelPos :: Maybe (Int,Int)
@@ -88,6 +96,7 @@ makeLenses ''SelectionList
 makeLenses ''SelectionItem
 makeLenses ''SelectionSection
 makeLenses ''SelectionSections
+makeLenses ''FilterableSections
 makeLenses ''SectionCursor
 --deriveJSON defaultOptions ''SelectionItem
 --deriveJSON defaultOptions ''SelectionList
diff --git a/src/Dodge/Default/World.hs b/src/Dodge/Default/World.hs
index f4bf3edff..732b25ebb 100644
--- a/src/Dodge/Default/World.hs
+++ b/src/Dodge/Default/World.hs
@@ -161,7 +161,7 @@ defaultHUD =
 
 defaultDisplayInventory :: HUDElement
 defaultDisplayInventory = DisplayInventory 
-    {_subInventory =NoSubInventory
+    {_subInventory = NoSubInventory
     , _diSections = defaultInvSections
     , _invRegex = Nothing
     , _closeRegex = Nothing