Allow shadow fidelity option, fix bug in rendering box shadows

src/Dodge/Data/Config.hs

@@ -3,6 +3,7 @@
 
 module Dodge.Data.Config where
 
+import Shape.Data
 import Control.Lens
 import Data.Aeson
 import Data.Aeson.TH
@@ -41,7 +42,8 @@ data Configuration = Configuration
     , _graphics_cloud_shadows :: Bool
     , _graphics_distortions :: Bool
     , _graphics_bloom :: Bool
-    , _graphics_object_shadows :: ShadowRendering
+    , _graphics_shadow_rendering :: ShadowRendering
+    , _graphics_shadow_size :: Importance
     , _graphics_downsize_resolution :: ResFactor
     , _graphics_world_resolution :: ResFactor
     , _graphics_overlay_resolution :: ResFactor
@@ -129,7 +131,8 @@ defaultConfig =
         , _volume_music = 0
         , _graphics_cloud_shadows = True
         , _graphics_bloom = True
-        , _graphics_object_shadows = GeoObjShads
+        , _graphics_shadow_rendering = GeoObjShads
+        , _graphics_shadow_size = Typical
         , _graphics_distortions = True
         , _graphics_downsize_resolution = SixteenthRes
         , _graphics_world_resolution = QuarterRes