Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-cite.el @ 104:cf808b4c4290 r20-1b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b4
author cvs
date Mon, 13 Aug 2007 09:16:51 +0200
parents 0d2f883870bc
children 360340f9fd5f
comparison
equal deleted inserted replaced
103:30eda07fe280 104:cf808b4c4290
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))