State: add options for attachment saving

use Data.Default for Much.State.State, Much.State.ColorConfig, Much.API.Config
refactor saveAttachment and openAttachment actions

1 files changed, 4 insertions, 2 deletions

diff --git a/src/Much/API/Config.hs b/src/Much/API/Config.hs
index 2e3b1cc..0a45068 100644
--- a/src/Much/API/Config.hs
+++ b/src/Much/API/Config.hs
@@ -1,11 +1,13 @@
 module Much.API.Config where
 
+import Data.Default
+
 data Config = Config
     { socketPath :: FilePath
     }
 
-emptyConfig :: Config
-emptyConfig =
+instance Default Config where
+  def =
     Config
       { socketPath = "/tmp/much.api.sock"
       }