exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Misc] Make certificate file directory customizable

Browse Source
This commit is contained in:
Daniel Borchmann 2017-10-28 14:28:29 +02:00
parent e7db348568
commit 9e4c0967e0
Signed by: exot
GPG Key ID: 4F63DB96D45AA9C6
1 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
init.el
View File

@ -649,10 +649,22 @@ _h_ _l_ _o_k _y_ank
gnutls-min-prime-bits 1024 gnutls-min-prime-bits 1024
gnutls-verify-error t) gnutls-verify-error t)
;; add own trustfiles (defun db/update-cert-file-directory (symbol new-value)
(dolist (cert-file "Set SYMBOL to NEW-VALUE and, assuming that NEW-VALUE points
(directory-files "~/.local/etc/certs" t "\.crt$")) to a directory, add all certificate files in it to
(add-to-list 'gnutls-trustfiles cert-file)))) `gnutls-trustfiles’.
Certificates are assumed to be of the form *.crt."
(set symbol new-value)
(when (file-directory-p new-value)
(dolist (cert-file (directory-files new-value))
(add-to-list 'gnutls-trustfiles cert-file))))
(defcustom db/cert-file-directory "~/.local/etc/certs"
"Local directory with additional certificates."
:group 'personal-settings
:type 'string
:set #'db/update-cert-file-directory)))
(use-package epg (use-package epg
:defer t :defer t