Added: correct win32 paths
This commit is contained in:
parent
15d5ece788
commit
b96ab10a90
|
|
@ -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.
|
||||
)
|
||||
)
|
||||
Loading…
Reference in New Issue
Block a user