🚀 go-pugleaf

Has anyone implemented recenter-definition?  This function, which was bound
to M-C-r in ZMACS, scrolled the window so that the current definition (and
possibly preceding comments) was fully visible.  This was a great boon when
trying to see all of a function's definition at once -- one keystroke, not
a bunch of fiddling with scrolling and C-l, did the trick.

If my memory serves me correctly, M-C-r had the following effects:
 * If the defun line is at the top of the screen, scroll so that comments
preceding the definition are also visible.  If there are no preceding
comments, do nothing.
 * If the entire defun is onscreen, or if the defun is partly off the top
of the screen, scroll so that the defun line is at the top of the window.
 * If the definition is partly off the bottom of the screen, scroll so that
the last line of the defun is at the bottom of the screen; but don't scroll
the defun line off the screen.
 * Point does not move and stays onscreen, which constraint on the amount
of scrolling that can be done.

If someone has implemented this (or feels inspired to do so), I'd sure
appreciate it.
					-Michael Ernst
					 mernst@theory.lcs.mit.edu