Function: Texinfo-insert-environment

Texinfo-insert-environment is a byte-compiled function defined in tex-info.el.

Signature

(Texinfo-insert-environment ENV)

Documentation

Insert Texinfo environment ENV.

Source Code

;; Defined in ~/.emacs.d/elpa/auctex-14.1.2/tex-info.el
(defun Texinfo-insert-environment (env)
  "Insert Texinfo environment ENV."
  (if (and (TeX-active-mark)
           (not (eq (mark) (point))))
      (progn
        (when (< (mark) (point))
          (exchange-point-and-mark))
        (unless (TeX-looking-at-backward "^[ \t]*")
          (newline))
        (insert "@" env)
        (newline)
        (goto-char (mark))
        (unless (TeX-looking-at-backward "^[ \t]*")
          (newline))
        (insert "@end " env)
        (save-excursion (newline))
        (end-of-line 0))
    (insert "@" env "\n\n@end " env "\n")
    (if (null (cdr-safe (assoc "defcv" Texinfo-environment-list)))
        (forward-line -2))))