(</~) :: (IConnection c) => c -> (DBType, PrimaryKey) -> IO ()
conn </~ (t,k) = void $ run conn (getDelete t) [toSql k]
(</~) :: (IConnection c) => c -> (DBType, PrimaryKey) -> IO ()
conn </~ (t,k) = void $ run conn (getDelete t) [toSql k]
conn </~ (t,k) = void $ run conn (getDelete t) [toSql k]