summaryrefslogtreecommitdiff
path: root/Omni/Task/Core.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Omni/Task/Core.hs')
-rw-r--r--Omni/Task/Core.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Omni/Task/Core.hs b/Omni/Task/Core.hs
index 4f7a3d3..2110170 100644
--- a/Omni/Task/Core.hs
+++ b/Omni/Task/Core.hs
@@ -237,9 +237,9 @@ getTasksDbPath :: IO FilePath
getTasksDbPath = do
customPath <- lookupEnv "TASK_DB_PATH"
testMode <- lookupEnv "TASK_TEST_MODE"
- let path = case (customPath, testMode) of
- (Just p, _) -> p -- Custom path wins (even in test mode, to allow specific test DBs)
- (_, Just "1") -> ".tasks/tasks-test.db"
+ let path = case (testMode, customPath) of
+ (Just "1", _) -> ".tasks/tasks-test.db" -- Test mode always uses test db
+ (_, Just p) -> p -- Custom path for production
_ -> ".tasks/tasks.db"
pure path