Lines Matching +defs:last +defs:line
48 "*Specifies the basic indentation level for `sgml-indent-line'."
236 "The command last used to validate in this buffer.")
389 (defun sgml-comment-indent-new-line (&optional soft)
394 (comment-indent-new-line soft)))
434 ;; A start or end tag by itself on a line separates a paragraph.
443 (set (make-local-variable 'indent-line-function) 'sgml-indent-line)
447 (set (make-local-variable 'comment-line-break-function)
448 'sgml-comment-indent-new-line)
552 (buffer-substring (line-beginning-position)
591 (sgml-name-char last-command-char))
597 (let ((mc last-command-char))
600 (or mc (setq mc last-command-char))
617 (defvar sgml-tag-last nil)
627 (setq sgml-tag-last
629 (if (> (length sgml-tag-last) 0)
630 (format "Tag (default %s): " sgml-tag-last)
632 sgml-tag-alist nil nil nil 'sgml-tag-history sgml-tag-last)))
710 (setq last-command-char ?\s)
833 ;; Delete any resulting empty line. If we didn't kill-sexp,
835 (if (progn (forward-line 0) (looking-at "\\(?:[ \t]*$\\)\n?"))
839 (if (progn (forward-line 0) (looking-at "\\(?:[ \t]*$\\)\n?"))
845 ;; Put read-only last to enable setting this even when read-only enabled.
922 and move to the line in the SGML document that caused it."
937 "Return true if point is at the first non-whitespace character on the line."
1157 By default, parse until we find a start-tag as the first thing on a line.
1159 we just skipped over some element and got to a beginning of line).
1161 The context is a list of tag-info structures. The last one is the tag
1282 (insert "</" (sgml-tag-name (car (last context))) ">")
1298 "Calculate the column to which this line should be indented.
1311 ;; Go back to previous non-empty line.
1313 (zerop (forward-line -1))
1316 ;; Previous line is inside the string.
1323 ;; Go back to previous non-empty line.
1325 (zerop (forward-line -1))
1329 ;; Previous line is inside the comment.
1363 ;; If possible, align on the previous non-empty text line.
1405 (defun sgml-indent-line ()
1406 "Indent the current line as SGML."
1417 (save-excursion (indent-line-to indent-col))
1418 (indent-line-to indent-col)))))
1476 (define-key map "\C-c\n" 'html-line)
1516 (define-key menu-map "\n" '("Line Break" . html-line))
1769 ("nobr" . "Text without line break")
1875 "*A regular expression matching a head line to be added to the menu.
1891 (line-beginning-position))
1961 (define-skeleton html-line
1962 "HTML line break tag."