From: Rudi Grinberg <me@rgrinberg.com>
Date: Sun, 9 Jan 2022 07:53:46 +0000 (-0700)
Subject: add xdg-state-dir
X-Git-Tag: 0.99~1930
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=6178c9ef90838745a40dc65d282b1c9b8cf6c7fb

add xdg-state-dir

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>

ps-id: F8159B75-B5E7-4700-8D15-ABA1DD27EF1B
---

diff --git a/basis/xdg/xdg.factor b/basis/xdg/xdg.factor
index fd3093d0df..395bd97756 100644
--- a/basis/xdg/xdg.factor
+++ b/basis/xdg/xdg.factor
@@ -27,3 +27,6 @@ IN: xdg
 : xdg-runtime-dir ( -- path/f )
     "XDG_RUNTIME_DIR" os-env ;
     ! TODO: check runtime secure permissions
+
+: xdg-state-dir ( -- path )
+    "XDG_STATE_HOME" os-env [ "~/.local/state" ] when-empty ;