summaryrefslogtreecommitdiff
path: root/lisp/auth-source.el
diff options
context:
space:
mode:
authorMark Oteiza <mvoteiza@udel.edu>2016-11-04 14:22:05 -0400
committerMark Oteiza <mvoteiza@udel.edu>2016-11-04 14:22:05 -0400
commit29559361f56c9398dcb69db7396dcfc0887843a2 (patch)
tree40dae77f5db5252ba22f4cdb74735b153da5924b /lisp/auth-source.el
parent2c6920a3650b07f597ceb22c883710f464a41d94 (diff)
downloademacs-29559361f56c9398dcb69db7396dcfc0887843a2.tar.gz
emacs-29559361f56c9398dcb69db7396dcfc0887843a2.tar.bz2
emacs-29559361f56c9398dcb69db7396dcfc0887843a2.zip
; Restore nixed comments
Diffstat (limited to 'lisp/auth-source.el')
-rw-r--r--lisp/auth-source.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 13836aab984..c59ebf4a93c 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -812,7 +812,9 @@ Returns the deleted entries."
"Forget all cached auth-source data."
(interactive)
(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))
+ ;; remove that key
(password-cache-remove (symbol-name sym))))
(setq auth-source-netrc-cache nil))