Cleanup

src/Dodge/Item/Scope.hs

@@ -1,4 +1,3 @@
-{-# LANGUAGE LambdaCase #-}
 module Dodge.Item.Scope (
     zoomScope,
     targetingScope,
@@ -21,8 +20,7 @@ zoomScope = defaultHeldItem
     & itUse .~ UseScope OpticScope{_opticPos = 0, _opticZoom = 1, _opticDefaultZoom = 0.5}
 
 targetingScope :: TargetingType -> Item
-targetingScope tt= case tt of
-    _ -> defaultHeldItem
+targetingScope tt = defaultHeldItem
         & itType .~ TARGETING tt
         & itUse .~ UseCraft 
         & itTargeting .~ ItTargeting