Re: sed ignorer une occurence

[Michel Verdier <mv524@free.fr>]

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))