Work on cloud/window transparency

src/Dodge/Data/Config.hs

@@ -39,15 +39,15 @@ data Config = Config
     { _volume_master :: Float
     , _volume_sound :: Float
     , _volume_music :: Float
-    , _graphics_cloud_shadows :: Bool
-    , _graphics_distortions :: Bool
-    , _graphics_bloom :: Bool
-    , _graphics_shadow_rendering :: ShadowRendering
-    , _graphics_shadow_size :: Importance
-    , _graphics_downsize_resolution :: ResFactor
-    , _graphics_world_resolution :: ResFactor
-    , _graphics_distortion_resolution :: ResFactor
-    , _graphics_num_shadow_casters :: NumShadowCasters
+    , _gr_cloud_shadows :: Bool
+    , _gr_distortions :: Bool
+    , _gr_bloom :: Bool
+    , _gr_shadow_rendering :: ShadowRendering
+    , _gr_shadow_size :: Importance
+    , _gr_downsize_res :: ResFactor
+    , _gr_world_res :: ResFactor
+    , _gr_distortion_res :: ResFactor
+    , _gr_num_shadow_casters :: NumShadowCasters
     , _windowX :: Int --size
     , _windowY :: Int
     , _windowPosX :: Int --position in os
@@ -133,15 +133,15 @@ defaultConfig =
         { _volume_master = 1
         , _volume_sound = 1
         , _volume_music = 0
-        , _graphics_cloud_shadows = True
-        , _graphics_bloom = True
-        , _graphics_shadow_rendering = GeoObjShads
-        , _graphics_shadow_size = Typical
-        , _graphics_distortions = True
-        , _graphics_downsize_resolution = EighthRes
-        , _graphics_world_resolution = QuarterRes
-        , _graphics_distortion_resolution = FullRes
-        , _graphics_num_shadow_casters = toEnum 10
+        , _gr_cloud_shadows = True
+        , _gr_bloom = True
+        , _gr_shadow_rendering = GeoObjShads
+        , _gr_shadow_size = Typical
+        , _gr_distortions = True
+        , _gr_downsize_res = EighthRes
+        , _gr_world_res = QuarterRes
+        , _gr_distortion_res = FullRes
+        , _gr_num_shadow_casters = toEnum 10
         , _windowX = 800
         , _windowY = 600
         , _windowPosX = 0