561 |
(autoload 'TeX-kill-job "tex-buf" nil t) |
(autoload 'TeX-kill-job "tex-buf" nil t) |
562 |
(autoload 'TeX-recenter-output-buffer "tex-buf" nil t) |
(autoload 'TeX-recenter-output-buffer "tex-buf" nil t) |
563 |
(autoload 'TeX-next-error "tex-buf" nil t) |
(autoload 'TeX-next-error "tex-buf" nil t) |
|
(autoload 'TeX-toggle-debug-boxes "tex-buf" nil t) |
|
564 |
(autoload 'TeX-region-file "tex-buf" nil nil) |
(autoload 'TeX-region-file "tex-buf" nil nil) |
565 |
(autoload 'TeX-current-offset "tex-buf" nil nil) |
(autoload 'TeX-current-offset "tex-buf" nil nil) |
566 |
(autoload 'TeX-process-set-variable "tex-buf" nil nil) |
(autoload 'TeX-process-set-variable "tex-buf" nil nil) |
786 |
:type 'boolean) |
:type 'boolean) |
787 |
|
|
788 |
(defcustom TeX-debug-bad-boxes nil |
(defcustom TeX-debug-bad-boxes nil |
789 |
"*Non-nil means also find overfull/underfull boxes warnings with \\[TeX-next-error]." |
"Non-nil means also find overfull/underfull box warnings with \\[TeX-next-error]." |
790 |
:group 'TeX-output |
:group 'TeX-output |
791 |
:type 'boolean) |
:type 'boolean) |
792 |
|
|
793 |
|
(defcustom TeX-debug-warnings nil |
794 |
|
"Non-nil means also find LaTeX or package warnings with \\[TeX-next-error]." |
795 |
|
:group 'TeX-output |
796 |
|
:type 'boolean) |
797 |
|
|
798 |
|
(defun TeX-toggle-debug-bad-boxes () |
799 |
|
"Toggle if the debugger should display \"bad boxes\" too." |
800 |
|
(interactive) |
801 |
|
(setq TeX-debug-bad-boxes (not TeX-debug-bad-boxes)) |
802 |
|
(message (concat "TeX-debug-bad-boxes: " |
803 |
|
(if TeX-debug-bad-boxes "on" "off")))) |
804 |
|
|
805 |
|
(defun TeX-toggle-debug-warnings () |
806 |
|
"Toggle if the debugger should display warnings too." |
807 |
|
(interactive) |
808 |
|
(setq TeX-debug-warnings (not TeX-debug-warnings)) |
809 |
|
(message (concat "TeX-debug-warnings: " |
810 |
|
(if TeX-debug-bad-boxes "on" "off")))) |
811 |
|
|
812 |
;;; Mode names. |
;;; Mode names. |
813 |
|
|
814 |
(defvar TeX-base-mode-name nil |
(defvar TeX-base-mode-name nil |
3365 |
(define-key map "\C-c\C-t\C-i" 'TeX-interactive-mode) |
(define-key map "\C-c\C-t\C-i" 'TeX-interactive-mode) |
3366 |
(define-key map "\C-c\C-t\C-s" 'TeX-source-specials-mode) |
(define-key map "\C-c\C-t\C-s" 'TeX-source-specials-mode) |
3367 |
(define-key map "\C-c\C-t\C-r" 'TeX-pin-region) |
(define-key map "\C-c\C-t\C-r" 'TeX-pin-region) |
3368 |
|
(define-key map "\C-c\C-w" 'TeX-toggle-debug-bad-boxes); to be removed |
3369 |
|
(define-key map "\C-c\C-t\C-b" 'TeX-toggle-debug-bad-boxes) |
3370 |
|
(define-key map "\C-c\C-t\C-w" 'TeX-toggle-debug-warnings) |
3371 |
(define-key map "\C-c\C-v" 'TeX-view) |
(define-key map "\C-c\C-v" 'TeX-view) |
3372 |
;; From tex-buf.el |
;; From tex-buf.el |
3373 |
(define-key map "\C-c\C-d" 'TeX-save-document) |
(define-key map "\C-c\C-d" 'TeX-save-document) |
3387 |
(substitute-key-definition 'previous-error 'TeX-previous-error |
(substitute-key-definition 'previous-error 'TeX-previous-error |
3388 |
map global-map) |
map global-map) |
3389 |
(define-key map [remap previous-error] 'TeX-previous-error)) |
(define-key map [remap previous-error] 'TeX-previous-error)) |
|
(define-key map "\C-c\C-w" 'TeX-toggle-debug-boxes) |
|
3390 |
;; From tex-fold.el |
;; From tex-fold.el |
3391 |
(define-key map "\C-c\C-o\C-f" 'TeX-fold-mode) |
(define-key map "\C-c\C-o\C-f" 'TeX-fold-mode) |
3392 |
|
|
3460 |
:active (not TeX-Omega-mode) |
:active (not TeX-Omega-mode) |
3461 |
:help "Use PDFTeX to generate PDF instead of DVI"] |
:help "Use PDFTeX to generate PDF instead of DVI"] |
3462 |
[ "Run Interactively" TeX-interactive-mode |
[ "Run Interactively" TeX-interactive-mode |
3463 |
:style toggle :selected TeX-interactive-mode |
:style toggle :selected TeX-interactive-mode :keys "C-c C-t C-i" |
3464 |
:help "Stop on errors in a TeX run"] |
:help "Stop on errors in a TeX run"] |
3465 |
[ "Source Specials" TeX-source-specials-mode |
[ "Source Specials" TeX-source-specials-mode |
3466 |
:style toggle :selected TeX-source-specials-mode |
:style toggle :selected TeX-source-specials-mode |
3467 |
:help "Enable forward and inverse search in the previewer"] |
:help "Enable forward and inverse search in the previewer"] |
3468 |
["Debug Bad Boxes" TeX-toggle-debug-boxes |
["Debug Bad Boxes" TeX-toggle-debug-bad-boxes |
3469 |
:style toggle :selected TeX-debug-bad-boxes |
:style toggle :selected TeX-debug-bad-boxes :keys "C-c C-t C-b" |
3470 |
:help "Make \"Next Error\" show bad boxes"]))) |
:help "Make \"Next Error\" show overfull and underfull boxes"] |
3471 |
|
["Debug Warnings" TeX-toggle-debug-warnings |
3472 |
|
:style toggle :selected TeX-debug-warnings |
3473 |
|
:help "Make \"Next Error\" show warnings"]))) |
3474 |
(let ((file 'TeX-command-on-current));; is this actually needed? |
(let ((file 'TeX-command-on-current));; is this actually needed? |
3475 |
(TeX-maybe-remove-help |
(TeX-maybe-remove-help |
3476 |
(delq nil |
(delq nil |