comparison lisp/textmodes/reftex-toc.el @ 104768:17d2ae0948e2

Remove unnecessary bindings of default-major-mode (all are followed by major-mode check and possible mode switch).
author Glenn Morris <rgm@gnu.org>
date Tue, 01 Sep 2009 03:02:25 +0000
parents da8b3e61b182
children f8ba8d6fd250
comparison
equal deleted inserted replaced
104767:8d8d06eea864 104768:17d2ae0948e2
168 reftex-toc-split-windows-fraction))) 168 reftex-toc-split-windows-fraction)))
169 (split-window-vertically 169 (split-window-vertically
170 (floor (* (window-height) 170 (floor (* (window-height)
171 reftex-toc-split-windows-fraction))))) 171 reftex-toc-split-windows-fraction)))))
172 172
173 (let ((default-major-mode 'reftex-toc-mode)) 173 (switch-to-buffer "*toc*"))
174 (switch-to-buffer "*toc*")))
175 174
176 (or (eq major-mode 'reftex-toc-mode) (reftex-toc-mode)) 175 (or (eq major-mode 'reftex-toc-mode) (reftex-toc-mode))
177 (set (make-local-variable 'reftex-docstruct-symbol) docstruct-symbol) 176 (set (make-local-variable 'reftex-docstruct-symbol) docstruct-symbol)
178 (setq reftex-toc-include-labels-indicator 177 (setq reftex-toc-include-labels-indicator
179 (if (eq reftex-toc-include-labels t) 178 (if (eq reftex-toc-include-labels t)