Mercurial > hg > xemacs-beta

comparison lisp/modes/view.el @ 16:0293115a14e9 r19-15b91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents ac2d302a0011
children ec9a17fef872
comparison
equal deleted inserted replaced
15:ad457d5f7d04 16:0293115a14e9
353 (if (>= (- lines) (view-window-size)) 353 (if (>= (- lines) (view-window-size))
354 (scroll-down nil) 354 (scroll-down nil)
355 (scroll-up lines))) 355 (scroll-up lines)))
356 (cond ((pos-visible-in-window-p (point-max)) 356 (cond ((pos-visible-in-window-p (point-max))
357 (goto-char (point-max)) 357 (goto-char (point-max))
358 (message "%" 358 (message "%s"
359 (substitute-command-keys 359 (substitute-command-keys
360 "End. Type \\[view-exit] to quit viewing.")))) 360 "End. Type \\[view-exit] to quit viewing."))))
361 (move-to-window-line -1) 361 (move-to-window-line -1)
362 (beginning-of-line))) 362 (beginning-of-line)))
363 363