Re: A possible marker bug in emacs 20.4

[G Annamalai]

Hi,

Well,  I dont know much of elisp.  So just trying to help.

In the function, if all you wanted was to remember the present state
of the buffer (cursor-position, etc) you might be interested in the
function "save-excursion".

C-h f save-excursion gives

<snip>
Save point, mark, and current buffer; execute BODY; restore those things.
Executes BODY just like `progn'.
<snip>

Maybe thats what you are looking for.

Cheers,
anna


"Bingham, Jay" <Jay.Bingham@compaq.com> writes:

> (defun trim-buffer ()
>   "Remove trailing whitespace from the lines in a buffer
> returning point to its original position when finished.
> Returning point to the original position means that it will be between the
> same characters
> that it was between when the function was invoked, unless one or both of the
> characters
> were removed, in which case it will be between the characters immediately
> before and after
> the deleted text.
> Whitespace for the purposes of this function is space, tab, and carriage
> return characters."
>   (interactive)
>   (let ((start-loc (make-marker)))
>     (setq start-loc (point))
>     (goto-char (point-min))
>     (while (and (< (point) (point-max))
>                       (re-search-forward "[ \t^M]*$" nil t))
>       (replace-match "" nil t)
>       (and (< (point) (point-max)) (forward-char)))
>     (not-modified)
>     (goto-char start-loc)))

-- 

If it wasn't for C, we'd be using BASI, PASAL and OBOL.