mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-03 20:24:29 +00:00
Code Issues Releases Activity

; Restore nixed comments

Browse Source
This commit is contained in:
Mark Oteiza 2016-11-04 14:22:05 -04:00
parent 2c6920a365
commit 29559361f5
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/auth-source.el
View File

@ -812,7 +812,9 @@ Returns the deleted entries."
"Forget all cached auth-source data." "Forget all cached auth-source data."
(interactive) (interactive)
(cl-do-symbols (sym password-data) (cl-do-symbols (sym password-data)
;; when the symbol name starts with auth-source-magic
(when (string-match (concat "^" auth-source-magic) (symbol-name sym)) (when (string-match (concat "^" auth-source-magic) (symbol-name sym))
;; remove that key
(password-cache-remove (symbol-name sym)))) (password-cache-remove (symbol-name sym))))
(setq auth-source-netrc-cache nil)) (setq auth-source-netrc-cache nil))