X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnndoc.el;h=38d274d1d932ce633b713d709e85506c36e73cbf;hb=5beb390633ce1e32cdf319c6ba19926244bbfdf2;hp=9f147e32b41e2473fb5648dc05764e963332ca76;hpb=ef8c9fbe38698f986c26ff81d39411f8627b9f3b;p=gnus diff --git a/lisp/nndoc.el b/lisp/nndoc.el index 9f147e32b..38d274d1d 100644 --- a/lisp/nndoc.el +++ b/lisp/nndoc.el @@ -1,7 +1,6 @@ ;;; nndoc.el --- single file access for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, -;; 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 1995-2012 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; Masanobu UMEDA @@ -918,7 +917,8 @@ from the document.") (setq body-end (point)) (push (list (incf i) head-begin head-end body-begin body-end (count-lines body-begin body-end)) - nndoc-dissection-alist))))))) + nndoc-dissection-alist))))) + (setq nndoc-dissection-alist (nreverse nndoc-dissection-alist)))) (defun nndoc-article-begin () (if nndoc-article-begin-function