X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnndoc.el;h=b17a7a6ecd8ed5e84d88f106e74e3b99c40cb874;hb=8f7476d4cfadb358d635238ae62c48a89efc6db2;hp=9f147e32b41e2473fb5648dc05764e963332ca76;hpb=d12d3a54c76eac95b783b96e92ddca9a8df0ed02;p=gnus diff --git a/lisp/nndoc.el b/lisp/nndoc.el index 9f147e32b..b17a7a6ec 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-2013 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