Re: Clear trailing whitespace on save, but not at the cursor

[Thien-Thi Nguyen <ttn@gnuvola.org>]

() Aaron Meurer <asmeurer@gmail.com>
() Sun, 4 Mar 2012 17:48:21 -0700

   Is there a way to clear whitespace on save, but
   then "put it back" where the cursor is?

Here is one way:

(defadvice delete-trailing-whitespace
  (around except-for-current-line activate)
  "However, leave trailing whitespace before point alone."
  (let ((save (when (looking-back "\\s-+" (line-beginning-position) t)
                (match-string 0))))
    ad-do-it
    (when save (insert save))))