On 22 Jul 2002, Vladimir Bormotov wrote:
From: Vladimir Bormotov <bor(a)vb.dn.ua>
To: xemacs-users-ru(a)xemacs.org
Subject: Re: trim trailing whitespaces
Date: 22 Jul 2002 15:27:10 +0300
X-Comment-To: Artur Penttinen
X-Mailer: Gnus v5.6.45/XEmacs 21.1 - "Arches"
X-Procmail-List: XEmacs Users RU Mailing list
Hi, Artur!
>>>>> "AP" == Artur Penttinen
<artur+xemacs.org(a)niif.spb.su> writes:
>> VB> что-от пошуршал апропосом по функциям/переменынм не нашел как
>> VB> бы научить xemacs удалять хвостовые пробельные символы.
[skip]
AP> мне кажется, что несколько не то...
AP> я просто, вручную задаю \C-x h \M-\A-% [ ^I]+$
хмм, руками не дело. Для рук есть дела по-важнее. Если с колупанием
ada-mode обломаюсь, то попробую вот сию конструкцию в виде e-lisp'а
повесить на save... ;-))
Всем спасибо ;-)
навскидку:
(defun arto-delete-trailing-whitespaces (beg end)
(interactive "r")
(save-excursion
(goto-char beg)
(while (re-search-forward "\s-+$" end t nil)
(replace-match ""))))
--
wbw,artur