Mercurial > emacs
changeset 50980:96a99720aa8b
(reftex-select-with-char): Don't assume that point-min == 1.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 13 May 2003 20:42:19 +0000 |
| parents | 85e525daebfc |
| children | b4fef1c0c73b |
| files | lisp/textmodes/reftex.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/reftex.el Tue May 13 20:41:45 2003 +0000 +++ b/lisp/textmodes/reftex.el Tue May 13 20:42:19 2003 +0000 @@ -1,5 +1,5 @@ ;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX -;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. +;; Copyright (c) 1997, 1998, 1999, 2000, 2003 Free Software Foundation, Inc. ;; Author: Carsten Dominik <dominik@science.uva.nl> ;; Version: 4.18 @@ -1965,12 +1965,12 @@ (switch-to-buffer-other-window "*RefTeX Select*") (insert help-string) (goto-char 1) - (unless (and (pos-visible-in-window-p 1) + (unless (and (pos-visible-in-window-p (point-min)) (pos-visible-in-window-p (point-max))) - (enlarge-window (1+ (- (count-lines 1 (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 1) + (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)" ""))))