Move configuration from world to universe

2021-11-28 22:30:47 +00:00
parent 45ba120796
commit 8c5777a1af
29 changed files with 343 additions and 300 deletions
@@ -0,0 +1,9 @@
+module LensHelp 
+    ( module Control.Lens
+    , (.:~)
+    ) where
+import Control.Lens
+
+infixr 4 .:~
+(.:~) :: ASetter s t [a] [a] -> a -> s -> t
+(.:~) m x = m %~ (x :)