emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r104105: registry.el (registry-reinde


From: Katsumi Yamaoka
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r104105: registry.el (registry-reindex): Fix percentage message.
Date: Wed, 04 May 2011 11:28:46 +0000
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 104105
author: Teodor Zlatanov <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Wed 2011-05-04 11:28:46 +0000
message:
  registry.el (registry-reindex): Fix percentage message.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/registry.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2011-05-03 22:41:28 +0000
+++ b/lisp/gnus/ChangeLog       2011-05-04 11:28:46 +0000
@@ -1,3 +1,7 @@
+2011-05-04  Teodor Zlatanov  <address@hidden>
+
+       * registry.el (registry-reindex): Fix percentage message.
+
 2011-05-03  Teodor Zlatanov  <address@hidden>
 
        * shr.el: Add shr-link face for links.

=== modified file 'lisp/gnus/registry.el'
--- a/lisp/gnus/registry.el     2011-05-03 22:41:28 +0000
+++ b/lisp/gnus/registry.el     2011-05-04 11:28:46 +0000
@@ -298,7 +298,7 @@
             (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)


reply via email to

[Prev in Thread] Current Thread [Next in Thread]