Mercurial > emacs
diff lisp/gnus/gnus-sum.el @ 79143:f6c37512dd9e
Merge from gnus--rel--5.10
Patches applied:
* gnus--rel--5.10 (patch 257-258)
- Merge from emacs--rel--22
- Update from CVS
2007-10-15 Katsumi Yamaoka <yamaoka@jpl.org>
* lisp/gnus/gnus-util.el (gnus-string<): New function.
* lisp/gnus/gnus-sum.el (gnus-article-sort-by-author)
(gnus-article-sort-by-subject): Use it.
2007-10-15 Katsumi Yamaoka <yamaoka@jpl.org>
* lisp/gnus/gnus-win.el (gnus-configure-windows): Focus on the frame for which
the frame-focus tag is set in gnus-buffer-configuration.
Revision: emacs@sv.gnu.org/emacs--rel--22--patch-128
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Thu, 18 Oct 2007 21:09:02 +0000 |
| parents | 65ad63ddd4f6 |
| children | 8d26a192ba18 a3c27999decb 1251cabc40b7 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el Thu Oct 18 21:00:43 2007 +0000 +++ b/lisp/gnus/gnus-sum.el Thu Oct 18 21:09:02 2007 +0000 @@ -4674,7 +4674,7 @@ (defsubst gnus-article-sort-by-author (h1 h2) "Sort articles by root author." - (string-lessp + (gnus-string< (let ((extract (funcall gnus-extract-address-components (mail-header-from h1)))) @@ -4691,7 +4691,7 @@ (defsubst gnus-article-sort-by-subject (h1 h2) "Sort articles by root subject." - (string-lessp + (gnus-string< (downcase (gnus-simplify-subject-re (mail-header-subject h1))) (downcase (gnus-simplify-subject-re (mail-header-subject h2)))))