Commit 7ec52c71caaf
emacs.org
@@ -427,6 +427,18 @@
load-path))
#+end_src
+*** Pinentry
+:PROPERTIES:
+:CUSTOM_ID: h:1f016a1a-f4ef-4ef0-be01-1fd68ca0d951
+:END:
+
+#+begin_src emacs-lisp :tangle init.el
+(use-package pinentry
+ :config
+ (setenv "INSIDE_EMACS" (format "%s,comint" emacs-version))
+ (pinentry-start))
+#+end_src
+
*** Loading configuration files
:PROPERTIES:
:CUSTOM_ID: h:d6aebc56-aadb-4b01-8404-bb922d12f8a8
init.el
@@ -100,6 +100,11 @@
(string-match-p "org$" x))
load-path))
+(use-package pinentry
+ :config
+ (setenv "INSIDE_EMACS" (format "%s,comint" emacs-version))
+ (pinentry-start))
+
(defun vde/el-load-dir (dir)
"Load el files from the given folder"
(let ((files (directory-files dir nil "\.el$")))
@@ -137,7 +142,7 @@
"Do we have git?")
(defvar *sys/full*
- (member (vde/short-hostname) '("naruhodo")) ; "wakasu" <- put wakasu back in
+ (member (vde/short-hostname) '("wakasu")) ; "naruhodo" <- put naruhodo back in
"Is it a full system ?")
(defvar *sys/light*
(not *sys/full*)
@@ -149,11 +154,6 @@
(if (file-exists-p (downcase (concat user-emacs-directory "/hosts/" (vde/short-hostname) ".el")))
(load-file (downcase (concat user-emacs-directory "/hosts/" (vde/short-hostname) ".el"))))
-(use-package pinentry
- :config
- (setenv "INSIDE_EMACS" (format "%s,comint" emacs-version))
- (pinentry-start))
-
(let ((elapsed (float-time (time-subtract (current-time)
emacs-start-time))))
(message "Loading %s...done (%.3fs)" load-file-name elapsed))