/[emacs]/emacs/lisp/textmodes/reftex.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/reftex.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.49 by lektu, Wed Jan 29 11:54:35 2003 UTC revision 1.50 by monnier, Tue May 13 20:42:19 2003 UTC
# Line 1  Line 1 
1  ;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX  ;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX
2  ;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.  ;; Copyright (c) 1997, 1998, 1999, 2000, 2003  Free Software Foundation, Inc.
3    
4  ;; Author: Carsten Dominik <dominik@science.uva.nl>  ;; Author: Carsten Dominik <dominik@science.uva.nl>
5  ;; Version: 4.18  ;; Version: 4.18
# Line 1965  When DIE is non-nil, throw an error if f Line 1965  When DIE is non-nil, throw an error if f
1965            (switch-to-buffer-other-window "*RefTeX Select*")            (switch-to-buffer-other-window "*RefTeX Select*")
1966            (insert help-string)            (insert help-string)
1967            (goto-char 1)            (goto-char 1)
1968            (unless (and (pos-visible-in-window-p 1)            (unless (and (pos-visible-in-window-p (point-min))
1969                         (pos-visible-in-window-p (point-max)))                         (pos-visible-in-window-p (point-max)))
1970              (enlarge-window (1+ (- (count-lines 1 (point-max))              (enlarge-window (1+ (- (count-lines (point-min) (point-max))
1971                                     (reftex-window-height)))))                                     (reftex-window-height)))))
1972            (setq truncate-lines t))            (setq truncate-lines t))
1973          (if (and (pos-visible-in-window-p 1)          (if (and (pos-visible-in-window-p (point-min))
1974                   (pos-visible-in-window-p (point-max)))                   (pos-visible-in-window-p (point-max)))
1975              nil              nil
1976            (setq prompt (concat prompt (if scroll "   (SPC/DEL=Scroll)" ""))))            (setq prompt (concat prompt (if scroll "   (SPC/DEL=Scroll)" ""))))

Legend:
Removed from v.1.49  
changed lines
  Added in v.1.50

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26