Function: allout-latex-verbatim-quote-curr-line
allout-latex-verbatim-quote-curr-line is a byte-compiled function
defined in allout.el.gz.
Signature
(allout-latex-verbatim-quote-curr-line)
Documentation
Express line for exact (literal) representation across LaTeX processing.
Adjust line contents so it is unaltered (from the original line)
across LaTeX processing, within the context of a verbatim
environment. Leaves point at the end of the line.
Source Code
;; Defined in /usr/src/emacs/lisp/allout.el.gz
;;;_ > allout-latex-verbatim-quote-curr-line ()
(defun allout-latex-verbatim-quote-curr-line ()
"Express line for exact (literal) representation across LaTeX processing.
Adjust line contents so it is unaltered (from the original line)
across LaTeX processing, within the context of a `verbatim'
environment. Leaves point at the end of the line."
(let ((inhibit-field-text-motion t))
(beginning-of-line)
(let (;(beg (point))
(end (point-at-eol)))
(save-match-data
(while (re-search-forward "\\\\"
;;"\\\\\\|\\{\\|\\}\\|\\_\\|\\$\\|\\\"\\|\\&\\|\\^\\|\\-\\|\\*\\|#"
end ; bounded by end-of-line
1) ; no matches, move to end & return nil
(goto-char (match-beginning 2))
(insert "\\")
(setq end (1+ end))
(goto-char (1+ (match-end 2))))))))