[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex.el

[Stefan Monnier]

Index: emacs/lisp/textmodes/reftex.el
diff -c emacs/lisp/textmodes/reftex.el:1.49 emacs/lisp/textmodes/reftex.el:1.50
*** emacs/lisp/textmodes/reftex.el:1.49 Wed Jan 29 06:54:35 2003
--- emacs/lisp/textmodes/reftex.el      Tue May 13 16:42:19 2003
***************
*** 1,5 ****
  ;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX
! ;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
  
  ;; Author: Carsten Dominik <address@hidden>
  ;; Version: 4.18
--- 1,5 ----
  ;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX
! ;; Copyright (c) 1997, 1998, 1999, 2000, 2003  Free Software Foundation, Inc.
  
  ;; Author: Carsten Dominik <address@hidden>
  ;; Version: 4.18
***************
*** 1965,1976 ****
          (switch-to-buffer-other-window "*RefTeX Select*")
          (insert help-string)
          (goto-char 1)
!         (unless (and (pos-visible-in-window-p 1)
                       (pos-visible-in-window-p (point-max)))
!           (enlarge-window (1+ (- (count-lines 1 (point-max))
                                   (reftex-window-height)))))
          (setq truncate-lines t))
!       (if (and (pos-visible-in-window-p 1)
                 (pos-visible-in-window-p (point-max)))
            nil
          (setq prompt (concat prompt (if scroll "   (SPC/DEL=Scroll)" ""))))
--- 1965,1976 ----
          (switch-to-buffer-other-window "*RefTeX Select*")
          (insert help-string)
          (goto-char 1)
!         (unless (and (pos-visible-in-window-p (point-min))
                       (pos-visible-in-window-p (point-max)))
!           (enlarge-window (1+ (- (count-lines (point-min) (point-max))
                                   (reftex-window-height)))))
          (setq truncate-lines t))
!       (if (and (pos-visible-in-window-p (point-min))
                 (pos-visible-in-window-p (point-max)))
            nil
          (setq prompt (concat prompt (if scroll "   (SPC/DEL=Scroll)" ""))))