Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!utgpu!water!watmath!clyde!rutgers!mcnc!xanth!kyle
From: kyle@xanth.UUCP
Newsgroups: comp.emacs
Subject: Re: commands wanted
Message-ID: <3548@xanth.UUCP>
Date: Tue, 24-Nov-87 23:51:03 EST
Article-I.D.: xanth.3548
Posted: Tue Nov 24 23:51:03 1987
Date-Received: Sat, 28-Nov-87 12:47:08 EST
References: <8711240526.AA17515@EDDIE.MIT.EDU>
Lines: 24

> Anybody written any of the following commands?  If so, please
> mail/post, thanks.

Written long ago for a Gosmacs emulation package...

> 1. move cursor to top of window

(defun beginning-of-window () (interactive) (goto-char (window-start)))

> 2. move cursor to bottom of window

(defun end-of-window () (interactive)
  (goto-char (window-start))
  (end-of-line (- (nth 3 (window-edges)) (nth 1 (window-edges)) 1)))

> 3. scroll window so line cursor is on is at top of window

Command exists already as (recenter), type ESC 0 C-l (ell not one).

> 4. scroll window so line cursor is on is at bottom of window

Command exists already againas (recenter), type ESC - 1 C-l.

kyle jones  <kyle@odu.edu>  old dominion university, norfolk, va  usa