From 190e24d5f633ce9c7c44f8a8d9d9cb20c31244a0 Mon Sep 17 00:00:00 2001
From: Franck Cuny <franck@fcuny.net>
Date: Sun, 5 Feb 2023 14:06:44 -0800
Subject: ref(misc): set location of some files

Change-Id: I201e804aeee3d579350b9efcf2680595ae8cf047
---
 emacs/custom/my-navigation.el | 9 +++++++++
 emacs/custom/my-settings.el   | 7 ++++++-
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/emacs/custom/my-navigation.el b/emacs/custom/my-navigation.el
index 12cc557..06de92e 100644
--- a/emacs/custom/my-navigation.el
+++ b/emacs/custom/my-navigation.el
@@ -8,10 +8,14 @@
 (require 'project)
 (require 'recentf)
 (require 'rg)
+(require 'transient)
 
 ;;; settings
 (setq help-window-select t)  ;; select help window when opening it
 
+;; where to store the list of projects
+(setq project-list-file (expand-file-name "var/projects" user-emacs-directory))
+
 (setq project-switch-commands
       '((?f "File" project-find-file)
         (?d "Dired" project-dired)
@@ -31,9 +35,14 @@
 (setq rg-align-line-column-separator "#")
 (setq rg-align-position-content-separator "|")
 
+;; where to store the list of recent files
+(setq recentf-save-file (expand-file-name "var/recentf" user-emacs-directory))
 (setq recentf-max-saved-items 500)
 (setq recentf-exclude '(".gz" ".xz" ".zip" "tmp/" "/ssh:"))
 
+;; where to store transient's history
+(setq transient-history-file (expand-file-name "var/transient-history.el" user-emacs-directory))
+
 ;;; bindings
 (global-set-key (kbd "C-x C-b") 'ibuffer)
 (global-set-key (kbd "M-g i") 'imenu)
diff --git a/emacs/custom/my-settings.el b/emacs/custom/my-settings.el
index 39140a3..b17f4a6 100644
--- a/emacs/custom/my-settings.el
+++ b/emacs/custom/my-settings.el
@@ -4,6 +4,8 @@
 
 ;;; Code:
 
+(require 'url-cookie)
+
 ;; set utf-8 as the default encoding
 (prefer-coding-system 'utf-8-unix)
 (setq locale-coding-system 'utf-8)
@@ -32,6 +34,9 @@
 (setq initial-scratch-message "")                ;; empty scratch buffer
 (setq garbage-collection-messages t)             ;; log when the gc kicks in
 
+;; where to store cookies
+(setq url-cookie-file (expand-file-name "var/url/cookies" user-emacs-directory))
+
 (custom-set-variables
  '(use-file-dialog nil)
  '(use-dialog-box nil)
@@ -65,7 +70,7 @@
 (defvar my/yasnippets (expand-file-name "etc/snippets" user-emacs-directory))
 
 (if (and  (file-exists-p my/yasnippets) (not (member my/yasnippets yas-snippet-dirs)))
-    (add-to-list 'yas-snippet-dirs my/yasnippets))
+    (setq yas--default-user-snippets-dir my/yasnippets))
 
 ;; the default (tab) conflicts with corfu for completion
 (define-key yas-minor-mode-map (kbd "C-c y") #'yas-expand)
-- 
cgit 1.4.1