diff options
author | Gnus developers <ding@gnus.org> | 2011-04-07 22:48:21 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2011-04-07 22:48:21 +0000 |
commit | 4523dc7f800db03f6bd86c84772dbe5ac39db851 (patch) | |
tree | 6190c95472117165ac99b8e6483600dbd5b97a37 /lisp/gnus/gnus-registry.el | |
parent | 5f64f7bd363dc97be5e0d198aad52045469faa8d (diff) |
gnus-registry.el (gnus-registry-handle-action): More debugging.
gnus-start.el (gnus-gnus-to-newsrc-format): Add a way to run interactively so the newsrc file can contain foreign groups too. Useful for debugging but not much for users.
registry.el (registry-usage-test): Only do `registry-lookup-breaks-before-lexbind' testing for Emacs24 with lexical binding.
Diffstat (limited to 'lisp/gnus/gnus-registry.el')
-rw-r--r-- | lisp/gnus/gnus-registry.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-registry.el b/lisp/gnus/gnus-registry.el index 5145f01d635..9824fc26f16 100644 --- a/lisp/gnus/gnus-registry.el +++ b/lisp/gnus/gnus-registry.el @@ -321,6 +321,9 @@ This is not required after changing `gnus-registry-cache-file'." (gnus-registry-handle-action id nil to subject sender))) (defun gnus-registry-handle-action (id from to subject sender) + (gnus-message + 10 + "gnus-registry-handle-action %S" (list id from to subject sender)) (let ((db gnus-registry-db) ;; safe if not found (entry (gnus-registry-get-or-make-entry id))) |