projects
/
elisp
/
wanderlust.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* elmo-internal.el (elmo-internal-search): Rewrite.
[elisp/wanderlust.git]
/
elmo
/
mmelmo.el
diff --git
a/elmo/mmelmo.el
b/elmo/mmelmo.el
index
14b24ff
..
102bda3
100644
(file)
--- a/
elmo/mmelmo.el
+++ b/
elmo/mmelmo.el
@@
-1,6
+1,6
@@
;;; mmelmo.el -- mm-backend by ELMO.
;;; mmelmo.el -- mm-backend by ELMO.
-;; Copyright 1998,1999,2000 Yuuichi Teranishi <teranisi@gohome.org>
+;; Copyright (C) 1998,1999,2000 Yuuichi Teranishi <teranisi@gohome.org>
;; Author: Yuuichi Teranishi <teranisi@gohome.org>
;; Keywords: mail, net news
;; Author: Yuuichi Teranishi <teranisi@gohome.org>
;; Keywords: mail, net news
@@
-156,7
+156,7
@@
If function is specified, its return value is used.")
(while attrlist
(setq ret-val (append ret-val
(list (cons (downcase (car attrlist))
(while attrlist
(setq ret-val (append ret-val
(list (cons (downcase (car attrlist))
- (downcase (car (cdr attrlist)))))))
+ (car (cdr attrlist))))))
(setq attrlist (cdr (cdr attrlist))))
ret-val)))
(setq attrlist (cdr (cdr attrlist))))
ret-val)))