First commit.
This commit is contained in:
28
lisp/utilities/auth-source.el
Normal file
28
lisp/utilities/auth-source.el
Normal file
@@ -0,0 +1,28 @@
|
||||
;;; auth-source.el --- Configure Emacs authentication sources -*- lexical-binding: t; -*-
|
||||
;;; Commentary:
|
||||
;;; Code: https://github.com/emacs-mirror/emacs/blob/master/lisp/auth-source.el
|
||||
;;; Doc: https://www.gnu.org/software/emacs/manual/html_mono/auth.html
|
||||
|
||||
(use-package auth-source
|
||||
:disabled
|
||||
:ensure nil
|
||||
:defer
|
||||
:config
|
||||
(validate-setq
|
||||
auth-sources
|
||||
`(,(path-join *user-data-directory* "authinfo.gpg")
|
||||
|
||||
,(path-join *user-data-directory* "authinfo")))
|
||||
|
||||
(dolist (source auth-sources)
|
||||
(when (file-exists-p source)
|
||||
(set-file-modes source #o0600)))
|
||||
|
||||
(when (eq system-type 'darwin)
|
||||
(add-many-to-list 'auth-sources
|
||||
'macos-keychain-internet
|
||||
'macos-keychain-generic)))
|
||||
|
||||
|
||||
(provide 'utilities/auth-source)
|
||||
;;; auth-source.el ends here
|
Reference in New Issue
Block a user