Hi, Artur! >>>>> "AP" == Artur Penttinen <artur+xemacs.org(a)niif.spb.su&gt; writes: >> >> VB> что-от пошуршал апропосом по функциям/переменынм не нашел как бы >> >> VB> научить xemacs удалять хвостовые пробельные символы. >> >> AP> я просто, вручную задаю \C-x h \M-\A-% [ ^I]+$ >> попробую вот сию конструкцию в виде e-lisp'а повесить на save... ;-)) AP> навскидку: AP> (defun arto-delete-trailing-whitespaces (beg end) AP> (interactive "r") (save-excursion AP> (goto-char beg) (while (re-search-forward "\s-+$" end t nil) AP> (replace-match "")))) вот это уже не навскидку, рабочий код ;-) ;; strip trailing spaces on write any file (defun strip-trailing-whitespaces (beg end) (interactive "r") (save-excursion (goto-char beg) (while (re-search-forward "\\s-+$" end t nil) (replace-match "") ))) (defun strip-trailing-whitespaces-buffer () (interactive) (strip-trailing-whitespaces (point-min) (point-max)) ) (add-hook 'write-file-hooks 'strip-trailing-whitespaces-buffer)