<<< Date Index >>>     <<< Thread Index >>>

Re: Delete text quoted more than once



Hendrik Mangels wrote:

Well, after booting that well-known little
emacs-operating-system-thingy and loading that fishy
editor-plugin, probably some lisp-magic can do the job... in
other words, not my area of expertise. Any emacs-gurus out
there, brave enough to avow oneself? ;-)

Hendrik

The following seems to work but is far not quite perfect - it relies on
newlines being a \n, and the regexp only matches if there is a > at the
beginning of the line followed by zero or more spaces and at least one
more >. Make up your own favourite keybinding to attach the function to.

(defun kill-double-quoted ()
 "kill lines that are quoted (>) twice or more"
 (interactive)
 (while (re-search-forward "^>\\( ?>\\)+.+\n" nil t)
 (replace-match "" nil nil)))

(local-set-key "\C-ck" 'kill-double-quoted)