diff options
author | Thanos Apollo <[email protected]> | 2024-01-19 00:13:35 +0200 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2024-01-19 00:29:12 +0200 |
commit | 427fe5f7df2ec401cec1cb120d2a7a1516dc1ecf (patch) | |
tree | 77c4e3feb0e7a1e390f0fe57d959028ad32361ad | |
parent | fd42525da74189c7c6d1eddd17fa15cfcc643cbd (diff) |
Refactor directory and database naming conventions
- Updated gnosis-dir to use `locate-user-emacs-file` for consistent file location
- Updated gnosis-images-dir to use `expand-file-name` for consistent filepath
- Updated gnosis-db to use `expand-file-name` for consistent filepath in emacsql-sqlite initialization
-rw-r--r-- | gnosis.el | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -51,7 +51,7 @@ :group 'external :prefix "gnosis-") -(defcustom gnosis-dir (concat user-emacs-directory "gnosis") +(defcustom gnosis-dir (locate-user-emacs-file "gnosis") "Gnosis directory." :type 'directory :group 'gnosis) @@ -62,13 +62,13 @@ :group 'gnosis) -(defvar gnosis-images-dir (concat (file-name-as-directory gnosis-dir) "images") +(defvar gnosis-images-dir (expand-file-name "images" gnosis-dir) "Gnosis images directory.") (defconst gnosis-db (if (not (file-directory-p gnosis-dir)) (gnosis-db-init) - (emacsql-sqlite (concat (file-name-as-directory gnosis-dir) "gnosis.db"))) + (emacsql-sqlite (expand-file-name "gnosis.db" gnosis-dir))) "Gnosis database file.") (defvar gnosis-testing nil |