• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10/emacs-93/emacs/lisp/textmodes/

Lines Matching +defs:last +defs:frame

40 (defvar reftex-last-window-height nil)
41 (defvar reftex-last-window-width nil)
79 (make-local-variable 'reftex-last-follow-point)
85 (defvar reftex-last-toc-file nil
105 a / d Toggle auto recenter / Toggle dedicated frame
121 (if (or (not (string= reftex-last-toc-master (reftex-TeX-master-file)))
125 (setq reftex-last-toc-file (buffer-file-name))
126 (setq reftex-last-toc-master (reftex-TeX-master-file))
149 (unsplittable (if (fboundp 'frame-property)
150 (frame-property (selected-frame) 'unsplittable)
151 (frame-parameter (selected-frame) 'unsplittable)))
162 (setq reftex-last-window-width (window-width)
163 reftex-last-window-height (window-height)) ; remember
198 " (abbreviate-file-name reftex-last-toc-master)))
231 (reftex-last-assoc-before-elt
240 (setq reftex-last-follow-point (point))))
246 (frame (selected-frame)))
250 (select-window (get-buffer-window buf frame))
261 (select-window (get-buffer-window buf frame))))
285 (not (equal reftex-last-follow-point (point)))
287 (setq reftex-last-follow-point (point))
296 (max 0 (- (or reftex-last-window-width (window-width))
299 (max 0 (- (or reftex-last-window-height (window-height))
302 (defun reftex-toc-dframe-p (&optional frame error)
303 ;; Check if FRAME is the dedicated TOC frame.
305 (setq frame (or frame (selected-frame)))
307 (if (fboundp 'frame-property)
308 (frame-property frame 'name)
309 (frame-parameter frame 'name))
312 (error "This frame is view-only. Use `C-c =' to create toc window for commands"))
356 (setq reftex-last-follow-point -1)
434 If the toc window is the only window on the dedicated TOC frame, the frame
439 (> (length (frame-list)) 1))
440 (delete-frame)
463 (setq bor (reftex-last-assoc-before-elt 'toc data docstruct)
499 (reftex-get-file-buffer-force reftex-last-toc-file))
508 (if (fboundp 'frame-property)
509 (frame-property (selected-frame) 'unsplittable)
510 (frame-parameter (selected-frame) 'unsplittable)))
514 (reftex-get-file-buffer-force reftex-last-toc-file))
516 (reftex-get-file-buffer-force reftex-last-toc-file))))
933 (string= reftex-last-toc-master (reftex-TeX-master-file))
958 (defun reftex-toc-toggle-dedicated-frame ()
959 "Toggle the display of a separate frame for the TOC.
960 This frame is not used by the `reftex-toc' commands, but it is useful to
965 (let* ((frames (frame-list)) frame
966 (get-frame-prop-func (if (fboundp 'frame-property)
967 'frame-property
968 'frame-parameter)))
969 (while (setq frame (pop frames))
970 (if (equal (funcall get-frame-prop-func frame 'name)
973 (delete-frame frame)
975 (reftex-make-separate-toc-frame))))
977 (defun reftex-make-separate-toc-frame ()
979 (let ((current-frame (selected-frame))
982 current-toc-frame)
984 (not (equal (selected-frame) (window-frame current-toc-window))))
986 (setq current-toc-frame
987 (make-frame
995 (select-frame current-toc-frame)
997 (select-frame current-frame)
998 (if (fboundp 'focus-frame) (focus-frame current-frame)
999 (if (fboundp 'x-focus-frame) (x-focus-frame current-frame)))
1001 (when (eq reftex-auto-recenter-toc 'frame)
1004 (add-hook 'delete-frame-hook 'reftex-toc-delete-frame-hook)))))
1006 (defun reftex-toc-delete-frame-hook (frame)
1008 (reftex-toc-dframe-p frame))
1037 ("d" . reftex-toc-toggle-dedicated-frame)
1095 ["Dedicated Frame" reftex-toc-toggle-dedicated-frame t])