equal
deleted
inserted
replaced
122 |
122 |
123 (defvar my-text-mode-list |
123 (defvar my-text-mode-list |
124 '( |
124 '( |
125 text-mode |
125 text-mode |
126 outline-mode |
126 outline-mode |
|
127 rst-mode |
127 ) |
128 ) |
128 "List of text modes.") |
129 "List of text modes.") |
129 |
130 |
130 (defvar my-text-mode-hook-list |
131 (defvar my-text-mode-hook-list |
131 (my-mode2hook my-text-mode-list) |
132 (my-mode2hook my-text-mode-list) |
768 (if (null arg) |
769 (if (null arg) |
769 (message "%s = %s" expr result) |
770 (message "%s = %s" expr result) |
770 (goto-char end) |
771 (goto-char end) |
771 (save-excursion |
772 (save-excursion |
772 (insert result))))) |
773 (insert result))))) |
|
774 |
|
775 ;; ---------------------------------------------------------------- |
|
776 (massage "rst, reStructuredText") |
|
777 |
|
778 ;; Maintaining the table of contents up-to-date. |
|
779 (add-hook 'rst-adjust-hook 'rst-toc-update) |
773 |
780 |
774 ;;; ---------------------------------------------------------------- |
781 ;;; ---------------------------------------------------------------- |
775 (message "TeX, LaTeX") |
782 (message "TeX, LaTeX") |
776 |
783 |
777 (setq tex-run-command "initex") |
784 (setq tex-run-command "initex") |