[gnus git] branch master updated: n0-17-15-g7c7afce =1= * registry.el (registry-reindex): Fix percentage message.
Ted Zlatanov <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 7c7afce961d5e03a1eab09c48fa2580b4b70b071 (commit)
from 318c44603465237692b4d03cb5a9947c153b8453 (commit)
- Log -----------------------------------------------------------------
commit 7c7afce961d5e03a1eab09c48fa2580b4b70b071
Author: Ted Zlatanov <[email protected]>
Date: Wed May 4 05:00:34 2011 -0500
* registry.el (registry-reindex): Fix percentage message.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4bc2b4b..619a326 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-05-04 Teodor Zlatanov <[email protected]>
+
+ * registry.el (registry-reindex): Fix percentage message.
+
2011-05-03 Teodor Zlatanov <[email protected]>
* shr.el: Add shr-link face for links.
diff --git a/lisp/registry.el b/lisp/registry.el
index e82ca8d..51bfc9c 100644
--- a/lisp/registry.el
+++ b/lisp/registry.el
@@ -298,7 +298,7 @@ Errors out if the key exists already."
(when (and (< 0 expected)
(= 0 (mod count 1000)))
(message "reindexing: %d of %d (%.2f%%)"
- count expected (/ (* 1000 count) expected)))
+ count expected (/ (* 100 count) expected)))
(dolist (val (cdr-safe (assq tr v)))
(let* ((value-keys (registry-lookup-secondary-value db tr val)))
(push key value-keys)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 4 ++++
lisp/registry.el | 2 +-
2 files changed, 5 insertions(+), 1 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project