* Change arguments to string and regexp search procedures. New

  arguments are (PATTERN MARK END #!OPTIONAL CASE-FOLD-SEARCH).

* Reimplement paragraph and region filling commands, to fix bugs and
  create new functionality.  Default region filling is now done by
  paragraphs rather than treating the entire region as a single
  paragraph.

* Implement M-x mail-fill-yanked-message.

diff --git a/v7/src/edwin/sendmail.scm b/v7/src/edwin/sendmail.scm
index 9c0398b9ea87ba45eb65a9735358158ba9ccbbd8..428dbca46119b5a62db327682291e1c41591d713 100644 (file)
--- a/v7/src/edwin/sendmail.scm
+++ b/v7/src/edwin/sendmail.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/sendmail.scm,v 1.2 1991/04/23 06:47:14 cph Exp $
+;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/sendmail.scm,v 1.3 1991/04/23 07:20:14 cph Exp $
 ;;;
 ;;;    Copyright (c) 1991 Massachusetts Institute of Technology
 ;;;
@@ -405,7 +405,7 @@ Numeric argument means justify as well."
   "P"
   (lambda (justify?)
     (let ((buffer (current-buffer)))
-      (mail-match-header-separator (buffer-start buffer) (buffer-end-buffer))
+      (mail-match-header-separator (buffer-start buffer) (buffer-end buffer))
       (fill-individual-paragraphs (re-match-end 0)
                                  (buffer-end-buffer)
                                  (ref-variable fill-column)