From 3c942f6f3ec42f27706253df78c0afe3ebde85bf Mon Sep 17 00:00:00 2001
From: Nikita Poberezkin <39944650+npoberezkin@users.noreply.github.com>
Date: Fri, 23 Jul 2021 09:41:10 +0300
Subject: [PATCH] create appDir if absent (#79)

---
 apps/dog-food/Notification.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/apps/dog-food/Notification.hs b/apps/dog-food/Notification.hs
index 4803b1ea0c..d01b0ad0ad 100644
--- a/apps/dog-food/Notification.hs
+++ b/apps/dog-food/Notification.hs
@@ -11,7 +11,7 @@ import Data.Char (toLower)
 import Data.List (isInfixOf)
 import Data.Text (Text)
 import qualified Data.Text as T
-import System.Directory (doesFileExist, getAppUserDataDirectory)
+import System.Directory (createDirectoryIfMissing, doesFileExist, getAppUserDataDirectory)
 import System.FilePath (combine)
 import System.Info (os)
 import System.Process (readCreateProcess, shell)
@@ -51,6 +51,7 @@ winScript path Notification {title, text} = "powershell.exe \"" <> T.pack path <
 savePowershellScript :: IO FilePath
 savePowershellScript = do
   appDir <- getAppUserDataDirectory "simplex"
+  createDirectoryIfMissing False appDir
   let psScript = combine appDir "win-toast-notify.ps1"
   writeFile
     psScript