[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: C-x home/end to select buffer before/after point?
From: |
Drew Adams |
Subject: |
RE: C-x home/end to select buffer before/after point? |
Date: |
Mon, 24 Sep 2007 11:41:22 -0700 |
> > (defun mark-buffer-before-point (reversep)
> > "Select the part of the buffer before point.
> > With a prefix argument, select the part after point."
> > (interactive "P")
> > (mark-buffer-after-point t))
>
> M-< C-x C-x
>
> > (defun mark-buffer-after-point (reversep)
> > "Select the part of the buffer after point.
> > With a prefix argument, select the part before point."
> > (interactive "P")
> > (push-mark (if reversep (point-min) (point-max)) nil t)
> > (setq deactivate-mark nil))
>
> M-> C-x C-x
Of course. And? The point was to be able to bind it to a single key.