Function: sgml-auto-attributes
sgml-auto-attributes is an interactive and byte-compiled function
defined in sgml-mode.el.gz.
Signature
(sgml-auto-attributes ARG)
Documentation
Self insert the character typed; at top level of tag, prompt for attributes.
With prefix argument, only self insert.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/textmodes/sgml-mode.el.gz
(defun sgml-auto-attributes (arg)
"Self insert the character typed; at top level of tag, prompt for attributes.
With prefix argument, only self insert."
(interactive "*P")
(let ((point (point))
tag)
(if (or arg
(not sgml-tag-alist) ; no message when nothing configured
(symbolp (setq tag (save-excursion (sgml-beginning-of-tag t))))
(eq (aref tag 0) ?/))
(self-insert-command (prefix-numeric-value arg))
(sgml-attributes tag)
(setq last-command-event ?\s)
(or (> (point) point)
(self-insert-command 1)))))