{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE StrictData #-}
module Dodge.Lock.Data
    where
import Dodge.Data
import Control.Lens

data Lock = Lock
    { _lkUnlocker :: Unlocker
    }

data Unlocker
    = ItemUnlocker Item

makeLenses ''Lock