; Restore nixed comments

diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 13836aab984d964aa11ca9a69bc49bc48841fe82..c59ebf4a93c6b953b77fd2abed820a8bc288d97c 100644 (file)
--- 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))