From b2978f58cdd6369548dcefeb9bb0c508587262b2 Mon Sep 17 00:00:00 2001
From: bd <bdunahu@gmail.com>
Date: Thu, 4 Jan 2024 19:18:47 -0700
Subject: Proper expand-file-name form

---
 .config/emacs/bd-default.el |  4 ++--
 .config/emacs/bd-emms.el    |  4 ++--
 .config/emacs/bd-org.el     |  4 ++--
 .config/emacs/init.el       | 17 ++++++++---------
 4 files changed, 14 insertions(+), 15 deletions(-)

(limited to '.config')

diff --git a/.config/emacs/bd-default.el b/.config/emacs/bd-default.el
index eababd8..b27a21d 100644
--- a/.config/emacs/bd-default.el
+++ b/.config/emacs/bd-default.el
@@ -3,7 +3,7 @@
 
 ;;;; packages
 (require 'package)
-(add-to-list 'load-path "/home/bdunahu/.guix-profile/share/emacs/site-lisp")
+(add-to-list 'load-path (expand-file-name "~/.guix-profile/share/emacs/site-lisp"))
 (guix-emacs-autoload-packages)
 
 (require 'use-package-ensure)
@@ -11,7 +11,7 @@
 ;; (setq use-package-verbose t) ; for debugging
 
 
-(setenv "PATH" (format "%s:%s" "/home/bdunahu/Personal/scripts/" (getenv "PATH")))
+(setenv "PATH" (format "%s:%s" (expand-file-name "~/Personal/scripts/") (getenv "PATH")))
 
 
 ;;;; functions
diff --git a/.config/emacs/bd-emms.el b/.config/emacs/bd-emms.el
index 24c0d25..cc414ab 100644
--- a/.config/emacs/bd-emms.el
+++ b/.config/emacs/bd-emms.el
@@ -32,8 +32,8 @@ playback."
   (emms-player-mpd-server-name "localhost")
   (emms-player-mod-server-port "6600")
   ;; set dir and volume keys
-  (emms-player-mpd-music-directory "/home/bdunahu/Personal/mpd/music/")
-  (emms-source-file-default-directory "/home/bdunahu/Personal/mpd/playlists/")
+  (emms-player-mpd-music-directory (expand-file-name "~/Personal/mpd/music/"))
+  (emms-source-file-default-directory (expand-file-name "~/Personal/mpd/playlists/"))
   (emms-volume-change-function 'emms-volume-mpd-change)
   ;; misc
   (emms-mode-line-format "%s ")
diff --git a/.config/emacs/bd-org.el b/.config/emacs/bd-org.el
index 7f3919f..84c5c86 100644
--- a/.config/emacs/bd-org.el
+++ b/.config/emacs/bd-org.el
@@ -31,7 +31,7 @@ each org file open."
   (org-ellipsis " ▾")
   (org-agenda-files
    `(,agenda-file
-     "/home/bdunahu/Personal/roam/agenda/archived_tasks.org"))
+     (expand-file-name "~/Personal/roam/agenda/archived_tasks.org")))
   (org-deadline-warning-days 7)
   (org-log-done 'time)
   (org-log-into-drawer "history")
@@ -86,7 +86,7 @@ file."
   :config
   (org-roam-db-autosync-mode)
   :custom
-  (org-roam-directory "/home/bdunahu/Personal/roam/")
+  (org-roam-directory (expand-file-name "~/Personal/roam/"))
   (org-roam-dailies-directory "logs/")
   (org-roam-complete-everywhere t)
   (org-roam-capture-templates '(("e" "extend" plain
diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index 99fb0f4..4fe9b04 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -6,16 +6,15 @@
 (setopt gc-cons-threshold 50000000)
 
 ;;;; do not store customized setting (automatic) here
-(setq custom-file "/home/bdunahu/.config/emacs/custom.el")
+(setopt custom-file (expand-file-name "~/.config/emacs/custom.el"))
 (load custom-file t)
 
-
-;;;; files are not segregated but not self-contained
-(load (expand-file-name "$HOME/.config/emacs/bd-default.el"))
-(load (expand-file-name "$HOME/.config/emacs/bd-org.el"))
-(load (expand-file-name "$HOME/.config/emacs/bd-emms.el"))
-(load (expand-file-name "$HOME/.config/emacs/bd-development.el"))
-(load (expand-file-name "$HOME/.config/emacs/bd-wm.el"))
-(load (expand-file-name "$HOME/.config/emacs/bd-mode-and-themes.el"))
+;;;; files are segregated but not self-contained
+(load (expand-file-name "~/.config/emacs/bd-default.el"))
+(load (expand-file-name "~/.config/emacs/bd-org.el"))
+(load (expand-file-name "~/.config/emacs/bd-emms.el"))
+(load (expand-file-name "~/.config/emacs/bd-development.el"))
+(load (expand-file-name "~/.config/emacs/bd-wm.el"))
+(load (expand-file-name "~/.config/emacs/bd-mode-and-themes.el"))
 
 (setopt gc-cons-threshold 800000)
-- 
cgit v1.2.3