Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-cite.el @ 28:1917ad0d78d7 r19-15b97

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b97
author cvs
date Mon, 13 Aug 2007 08:51:55 +0200
parents 0293115a14e9
children ec9a17fef872
comparison
equal deleted inserted replaced
27:0a3286277d9b 28:1917ad0d78d7
417 (set-buffer gnus-article-buffer) 417 (set-buffer gnus-article-buffer)
418 (let ((buffer-read-only nil) 418 (let ((buffer-read-only nil)
419 (inhibit-point-motion-hooks t) 419 (inhibit-point-motion-hooks t)
420 (marks (gnus-dissect-cited-text)) 420 (marks (gnus-dissect-cited-text))
421 (adaptive-fill-mode nil) 421 (adaptive-fill-mode nil)
422 (filladapt-mode nil)
422 (fill-column (if width (prefix-numeric-value width) fill-column))) 423 (fill-column (if width (prefix-numeric-value width) fill-column)))
423 (save-restriction 424 (save-restriction
424 (while (cdr marks) 425 (while (cdr marks)
425 (widen) 426 (widen)
426 (narrow-to-region (caar marks) (caadr marks)) 427 (narrow-to-region (caar marks) (caadr marks))