projects
/
elisp
/
gnus.git-
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
4598b90
)
Synch to No Gnus 200401202256.
author
yamaoka
<yamaoka>
Tue, 20 Jan 2004 22:59:29 +0000
(22:59 +0000)
committer
yamaoka
<yamaoka>
Tue, 20 Jan 2004 22:59:29 +0000
(22:59 +0000)
lisp/ChangeLog
patch
|
blob
|
history
lisp/spam-stat.el
patch
|
blob
|
history
diff --git
a/lisp/ChangeLog
b/lisp/ChangeLog
index
a20cd07
..
256ba92
100644
(file)
--- a/
lisp/ChangeLog
+++ b/
lisp/ChangeLog
@@
-1,3
+1,8
@@
+2004-01-20 Jesper Harder <harder@ifa.au.dk>
+
+ * spam-stat.el (spam-stat-to-hash-table): Use :size argument in
+ make-hash-table.
+
2004-01-19 Katsumi Yamaoka <yamaoka@jpl.org>
* canlock.el (base64-encode-string): Don't autoload it.
2004-01-19 Katsumi Yamaoka <yamaoka@jpl.org>
* canlock.el (base64-encode-string): Don't autoload it.
diff --git
a/lisp/spam-stat.el
b/lisp/spam-stat.el
index
bbbba63
..
8464c2b
100644
(file)
--- a/
lisp/spam-stat.el
+++ b/
lisp/spam-stat.el
@@
-399,7
+399,8
@@
the word string, NGOOD is the number of good mails it has appeared in,
NBAD is the number of bad mails it has appeared in, GOOD is the number
of times it appeared in good mails, and BAD is the number of times it
has appeared in bad mails."
NBAD is the number of bad mails it has appeared in, GOOD is the number
of times it appeared in good mails, and BAD is the number of times it
has appeared in bad mails."
- (let ((table (make-hash-table :test 'equal)))
+ (let ((table (make-hash-table :size (length entries)
+ :test 'equal)))
(mapc (lambda (l)
(puthash (car l)
(spam-stat-make-entry (nth 1 l) (nth 2 l))
(mapc (lambda (l)
(puthash (car l)
(spam-stat-make-entry (nth 1 l) (nth 2 l))