Lines Matching +defs:set +defs:end
170 otherwise, the file name, preceded by blank, is added at the end."
178 otherwise, the file name, preceded by blank, is added at the end."
186 otherwise, the file name, preceded by blank, is added at the end.
188 If two printers are not enough of a choice, you can set the variable
210 otherwise, the file name, preceded by a space, is added at the end.
228 Normally set to either `plain-tex-mode' or `latex-mode'."
255 value of `tex-start-commands', and the file name are added at the end
259 In these modes, use \\[set-variable] if you want to change it for the
263 "String appended after the end of a region sent to TeX by \\[tex-region].")
268 (defvar tex-end-of-header nil
269 "Regular expression used by \\[tex-region] to find end of file's header.")
327 "begin{document}" "end{document}"
355 (match-end 1))
381 (match-end 2))
418 ; '(("\\\\\\(begin\\|end\\|newcommand\\){\\([a-zA-Z0-9\\*]+\\)}"
429 ; '(("\\\\\\(begin\\|end\\|newcommand\\){\\([a-zA-Z0-9\\*]+\\)}"
451 '("title" "begin" "end" "chapter" "part"
477 ;; font-lock-syntactic-keywords causes the \ of \end{verbatim} to be
480 '("^\\(\\\\\\)end" (1 (get-text-property (match-end 1) 'face) t))
493 ;; match more lines at a time, so ARG will end up matching
514 (unless (memq (get-text-property (match-end 1) 'face)
604 (when (match-end 3)
606 (end (save-restriction
609 (store-match-data (if end
610 (list (match-beginning 0) end beg end)
630 ;; the \end, but this would have 2 disadvantages:
632 ;; start and end the fenced-string).
638 (,(concat "^\\(\\\\\\)end *{" verbs "}\\(.?\\)") (1 "|") (3 "<"))
640 ;; ("^\\\\end *{comment}.*\\(\n\\)" 1 "> b")
644 1 (tex-font-lock-verb (match-end 1))))))
646 (defun tex-font-lock-unfontify-region (beg end)
647 (font-lock-default-unfontify-region beg end)
648 (while (< beg end)
649 (let ((next (next-single-property-change beg 'display nil end))
683 (defun tex-font-lock-verb (end)
686 (unless (nth 8 (syntax-ppss end))
690 ;; Let's find the end and mark it.
692 ;; this leads to funny effects when jumping to the end of the buffer,
696 (goto-char end)
698 (skip-chars-forward (string ?^ char)) ;; Use `end' ?
745 (set-keymap-parent map text-mode-map)
782 (set-keymap-parent map tex-mode-map)
789 (set-keymap-parent map tex-mode-map)
795 (set-keymap-parent m shell-mode-map)
821 (setq comment (let ((search-end (point)))
824 (search-forward "%" search-end t))))))
890 and '' when it appears to be the end; it inserts \" only after a \\.
926 (set (make-local-variable 'tex-command) tex-run-command)
927 (set (make-local-variable 'tex-start-of-header) "%\\*\\*start of header")
928 (set (make-local-variable 'tex-end-of-header) "%\\*\\*end of header")
929 (set (make-local-variable 'tex-trailer) "\\bye\n"))
936 and '' when it appears to be the end; it inserts \" only after a \\.
972 (set (make-local-variable 'tex-command) latex-run-command)
973 (set (make-local-variable 'tex-start-of-header)
975 (set (make-local-variable 'tex-end-of-header) "\\\\begin\\s-*{document}")
976 (set (make-local-variable 'tex-trailer) "\\end{document}\n")
985 '("begin" "label" "end"
996 '("begin" "label" "end" )) t)
1002 (set (make-local-variable 'imenu-create-index-function)
1004 (set (make-local-variable 'tex-face-alist) tex-latex-face-alist)
1006 (set (make-local-variable 'indent-line-function) 'latex-indent)
1007 (set (make-local-variable 'fill-indent-according-to-mode) t)
1008 (set (make-local-variable 'outline-regexp) latex-outline-regexp)
1009 (set (make-local-variable 'outline-level) 'latex-outline-level)
1010 (set (make-local-variable 'forward-sexp-function) 'latex-forward-sexp)
1011 (set (make-local-variable 'skeleton-end-hook) nil))
1018 and '' when it appears to be the end; it inserts \" only after a \\.
1060 (set (make-local-variable 'search-whitespace-regexp) "[ \t\r\n\f]+")
1062 (set (make-local-variable 'paragraph-start)
1066 (set (make-local-variable 'paragraph-separate)
1068 (set (make-local-variable 'comment-start) "%")
1069 (set (make-local-variable 'comment-add) 1)
1070 (set (make-local-variable 'comment-start-skip)
1072 (set (make-local-variable 'parse-sexp-ignore-comments) t)
1073 (set (make-local-variable 'compare-windows-whitespace)
1075 (set (make-local-variable 'facemenu-add-face-function)
1076 (lambda (face end)
1079 (set (make-local-variable 'facemenu-end-add-face) "}")
1080 (set (make-local-variable 'facemenu-remove-face-function) t)
1081 (set (make-local-variable 'font-lock-defaults)
1095 (set (make-local-variable 'indent-tabs-mode) nil)
1099 (make-local-variable 'tex-end-of-header)
1103 ;; compare-windows-whitespace is set to this.
1112 (goto-char (match-end 0))
1121 (goto-char (match-end 0)))))
1171 (let ((end (point))
1172 prev-end)
1176 (setq prev-end (point))
1178 (goto-char (setq prev-end (point-min))))
1179 (or (tex-validate-region (point) end)
1180 (let* ((end (line-beginning-position 2))
1191 ;; Since we scan from end of buffer to beginning,
1195 (set-buffer standard-output)
1200 (insert-buffer-substring buffer start end)
1201 (let (text-beg (text-end (point-marker)))
1202 (forward-char (- start end))
1206 text-beg (- text-end 1)
1209 (put-text-property text-beg (- text-end 1)
1211 (goto-char prev-end))))
1222 (defun tex-validate-region (start end)
1227 (let ((failure-point nil) (max-possible-sexps (- end start)))
1231 (narrow-to-region start end)
1319 "Create a matching pair of lines \\begin{NAME} and \\end{NAME} at point.
1336 "\\end{" str "}" > \n)
1364 (re-search-backward "\\\\\\(begin\\|end\\)\\s *{"))
1365 (looking-at "\\\\end"))
1369 (defun tex-next-unmatched-end ()
1370 "Leave point at the end of the next `\\end' that is unended."
1372 (re-search-forward "\\\\\\(begin\\|end\\)\\s *{[^}]+}"))
1375 (tex-next-unmatched-end)))
1400 (if (or (looking-at "\\\\end\\>")
1402 (and (looking-at "end\\>") (eq (char-before) ?\\)))
1414 ((looking-at "\\\\end\\>")
1422 (goto-char (match-end 0))
1423 (tex-next-unmatched-end))
1443 (if (looking-at "\\\\end\\>") ?\) (char-syntax (following-char))))
1449 (looking-at "\\\\end\\>"))
1466 "Create an \\end{...} to match the last unclosed \\begin{...}."
1471 \n "\\end" str > \n)
1474 "Split the enclosing environment by inserting \\end{..}\\begin{..} at point."
1479 (goto-char (match-end 1))
1485 \n "\\end" str > \n _ \n "\\begin" str v1 > \n)
1488 '("begin" "end" "input" "special" "cite" "ref" "include" "includeonly"
1492 (defun tex-count-words (begin end)
1496 (list (region-beginning) (region-end))
1502 (while (and (< (point) end) (re-search-forward "\\<" end t))
1535 (set (make-local-variable 'compilation-parse-errors-function)
1549 (set-process-sentinel proc 'tex-shell-sentinel)
1550 (set-process-query-on-exit-flag proc nil)
1560 (set-buffer (tex-shell-buf))
1572 (set-process-buffer proc nil)
1577 (defun tex-set-buffer-directory (buffer directory)
1583 (set-buffer buffer)
1622 (set-buffer buf)
1719 ;; Look for a buffer with `tex-main-file' set.
1988 (set-marker compilation-parsing-end (1- (point-max))))
2021 begin-of-error end-of-error)
2023 (goto-char compilation-parsing-end)
2028 end-of-error (match-end 0)))
2070 (>= end-of-error limit-search)))
2080 (goto-char end-of-error)))))
2081 (set-marker compilation-parsing-end (point))
2087 (defun tex-region (beg end)
2094 defined by `tex-start-of-header' and `tex-end-of-header' inclusive.
2124 (let ((search-end (point))
2140 (if (re-search-forward tex-start-of-header search-end t)
2144 (if (re-search-forward tex-end-of-header nil t)
2147 (setq hend (point)) ;mark end of header
2156 (write-region (max beg already-output) end
2211 (setq start (match-end 0)))
2292 You must set that variable yourself before using this command,
2296 (error "You must set `tex-dvi-view-command'"))
2403 (and (looking-at "\\\\\\(begin\\|end\\) *{\\([^\n}]+\\)")
2473 (if (< (line-end-position)
2495 (let ((end (line-end-position)))
2496 (if (< end (point-max))
2498 end (1+ end)