Function: mm-base64-line-p
mm-base64-line-p is a byte-compiled function defined in
mm-bodies.el.gz.
Signature
(mm-base64-line-p)
Documentation
Say whether the current line is base64.
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/mm-bodies.el.gz
(defun mm-base64-line-p ()
"Say whether the current line is base64."
;; This is coded in this way to avoid using regexps that may
;; overflow -- a base64 line may be megabytes long.
(save-excursion
(beginning-of-line)
(skip-chars-forward " \t")
(and (looking-at "[A-Za-z0-9+/]\\{3\\}")
(progn
(skip-chars-forward "A-Za-z0-9+/")
(skip-chars-forward "=")
(skip-chars-forward " \t")
(eolp)))))