Mercurial > hg > xemacs-beta

comparison lisp/packages/mime-compose.el @ 108:360340f9fd5f r20-1b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b6
author cvs
date Mon, 13 Aug 2007 09:18:39 +0200
parents 131b0175ea99
children
comparison
equal deleted inserted replaced
107:523141596bda 108:360340f9fd5f
592 (insert "Content-Transfer-Encoding: quoted-printable\n")) 592 (insert "Content-Transfer-Encoding: quoted-printable\n"))
593 (mime-maybe-highlight-region 593 (mime-maybe-highlight-region
594 (save-excursion (re-search-backward 594 (save-excursion (re-search-backward
595 (concat "--" (mime-primary-boundary))) (point)) 595 (concat "--" (mime-primary-boundary))) (point))
596 (- (point) 1)) 596 (- (point) 1))
597 (insert "\n")
597 (let ((start (point)) end (seldisp selective-display)) 598 (let ((start (point)) end (seldisp selective-display))
598 (next-line 1) 599 (next-line 1)
599 (save-excursion 600 (save-excursion
600 (next-line -1) 601 (next-line -1)
601 (insert-file filename)) 602 (insert-file filename))