# HG changeset patch # User Stefan Monnier # Date 1052858539 0 # Node ID 96a99720aa8b78211be7d5bb23aac22d31536536 # Parent 85e525daebfcd9a2be77580a24b24ad9d3b31f2d (reftex-select-with-char): Don't assume that point-min == 1. diff -r 85e525daebfc -r 96a99720aa8b lisp/textmodes/reftex.el --- 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 ;; 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)" ""))))