Function: sc-mail-append-field

sc-mail-append-field is a byte-compiled function defined in supercite.el.gz.

Signature

(sc-mail-append-field)

Documentation

Append a continuation line onto the last fetched mail field's info.

Source Code

;; Defined in /usr/src/emacs/lisp/mail/supercite.el.gz
(defun sc-mail-append-field ()
  "Append a continuation line onto the last fetched mail field's info."
  (let ((keyval (car sc-mail-info)))
    (if (and keyval (string-match "^\\s *\\(.*\\)$" curline))
	(setcdr keyval (concat (cdr keyval) " "
			       (match-string-no-properties 1 curline)))))
  nil)