Xemacs mark-end-of-buffer, (from simple.el)

Xemacs mark-end-of-buffer, (from simple.el)

[Uwe Brauer]

Hello 


There is one function from Xemacs which I have not seen in GNU emacs and
which I miss very much.

(defun mark-end-of-buffer (&optional arg)


Could this function just be used, or its functionality be implemented?

The function is in Xemacs simple.el, the code is now under GPL 3, but I
am not sure about the FSF copyright business and that is why I have to
copied the code in this message.

thanks


Uwe Brauer 

Re: Xemacs mark-end-of-buffer, (from simple.el)

[Damien Wyart]

* Uwe Brauer <oub@mat.ucm.es> [2014-02-03 13:07]:
> There is one function from Xemacs which I have not seen in GNU emacs and
> which I miss very much.

> (defun mark-end-of-buffer (&optional arg)

It is defined in lisp/misc.el, but not with an optional arg, so it
doesn't have the full features set of the one in XEmacs.

-- 
Damien Wyart

Re: Xemacs mark-end-of-buffer, (from simple.el)

[Stefan Monnier]

> There is one function from Xemacs which I have not seen in GNU emacs and
> which I miss very much.
> (defun mark-end-of-buffer (&optional arg)

Try M-x report-emacs-bug requesting its addition, with arguments for
how/when/where/why you use it.


        Stefan

Re: Xemacs mark-end-of-buffer, (from simple.el)

[Uwe Brauer]

[-- Attachment #1: Type: text/plain, Size: 1168 bytes --]

>> "Damien" == Damien Wyart <damien.wyart@gmail.com> writes:

   > * Uwe Brauer <oub@mat.ucm.es> [2014-02-03 13:07]:
   >> There is one function from Xemacs which I have not seen in GNU emacs and
   >> which I miss very much.

   >> (defun mark-end-of-buffer (&optional arg)

   > It is defined in lisp/misc.el, but not with an optional arg, so it
   > doesn't have the full features set of the one in XEmacs.
A couple of comments:

    -  could it please move to simple.el, since misc.el usually is not
       loaded per default.

    -  the  current version does set the mark (visible) even with
       transient-mark-mode on. So propose the following modification 

(defun mark-beginning-of-buffer ()
  "Set mark at the beginning of the buffer."
  (interactive)
  (push-mark (point-min) nil t ))

(defun mark-end-of-buffer ()
  "Set mark at the end of the buffer."
  (interactive)
  (push-mark (point-max) nil t))



    -  now the Xemacs version is more sophisticated (takes into account
       the size of buffer. But may be this ancient code, when (X)emacs
       could deal well with large buffers. I will ask on xemacs beta.


[-- Attachment #2: smime.p7s --]
[-- Type: application/pkcs7-signature, Size: 5556 bytes --]