From b96ab10a90215a16eb6c3894bb0433f447eddd1b Mon Sep 17 00:00:00 2001 From: rhjr Date: Sat, 29 Nov 2025 09:32:59 +0000 Subject: [PATCH] Added: correct win32 paths --- .config/emacs/init.el | 30 ++++++++++++++++++++++-------- 1 file changed, 22 insertions(+), 8 deletions(-) diff --git a/.config/emacs/init.el b/.config/emacs/init.el index 13e1d91..3bf36c3 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -1,14 +1,22 @@ ;; rhjr/paths -(defvar rhjr/paths/config "~/.config/emacs/") -(defvar rhjr/paths/packages (concat rhjr/paths/config "packages/")) -(defvar rhjr/paths/thirdparty (concat rhjr/paths/config "thirdparty/")) +(defconst rhjr/base-config-dir + (if (eq system-type 'windows-nt) + "C:\\Users\\Rhjr\\AppData\\Roaming\\.emacs.d\\" + "~/.config/emacs/")) -(defvar rhjr/paths/no-littering/etc (concat rhjr/paths/config "config/")) -(defvar rhjr/paths/no-littering/var (concat rhjr/paths/config "data/")) +(defconst rhjr/paths/config rhjr/base-config-dir) +(defconst rhjr/paths/packages (concat rhjr/paths/config "packages/")) +(defconst rhjr/paths/thirdparty (concat rhjr/paths/config "thirdparty/")) -(defvar rhjr/paths/eln-cache (concat rhjr/paths/config "data/eln-cache")) +(defconst rhjr/paths/no-littering/etc (concat rhjr/paths/config "config/")) +(defconst rhjr/paths/no-littering/var (concat rhjr/paths/config "data/")) -(defvar rhjr/paths/home "~") +(defconst rhjr/paths/eln-cache (concat rhjr/paths/config "data/eln-cache")) + +(defconst rhjr/paths/home + (if (eq system-type 'windows-nt) + "C:\\Users\\Rhjr\\Home\\" + "~")) ;; rhjr/archives (require 'package) @@ -76,6 +84,12 @@ dired-recursive-deletes 'always dired-listing-switches "-laGh1v --group-directories-first")) +;;; rhjr/win32 +(when (eq system-type 'windows-nt) + (setq select-enable-clipboard t + grep-program "C:\\ProgramData\\chocolatey\\bin\\grep.exe" + find-program "C:\\Windows\\System32\\find.exe")) + ;;; rhjr/functions ;; private functions (defun display-startup-echo-area-message () @@ -232,4 +246,4 @@ ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. - ) +) \ No newline at end of file