Re: sed ignorer une occurence
Le 1 juin 2023 benoit a écrit :
> Il me reste juste l'exception pour le cas ou je veux laisser les "\n" des lignes qui se terminent par un "." ?
Ah oui j'avais zappé ça. Voilà mon texte de test :
Je voudrais reformater du texte en colonne, qui a été just-
ifié avec des retours à la ligne (\n) et est - de coupure de
mot.
Mais pas ce dernier.
Et l'ajout de la ligne qui va bien :
(defun ConvertRet ()
"Convertit un retour à la ligne."
(interactive)
(let (
(p1 (region-beginning))
(p2 (region-end)))
(save-restriction
(narrow-to-region p1 p2)
(goto-char (point-min))
(while (re-search-forward "-\\\n" nil t)
(replace-match "" nil t))
(goto-char (point-min))
(while (re-search-forward "\\\n" nil t)
(cond (not match ".\\\n")
(replace-match " " nil t)))
)))
(defun indentBuffer ()
"Convertit un texte jutifié avec des retours à la ligne."
(interactive)
(mark-whole-buffer)
(ConvertRet))
Reply to: