diff --git a/.emacs b/.emacs
index 5760bca25ab5b735389a0a8d7f26e64056b71cbd..19fc43750c8e7a90fa15a37f1de11cf04a73d08c 100644
--- a/.emacs
+++ b/.emacs
@@ -1063,11 +1063,8 @@
   (interactive)
   (end-of-line)
   (kill-line)
-  (save-excursion
-    (goto-char (point))
-    (when (re-search-forward ">\\( *>\\)* *" nil t)
-      (replace-match "" nil t)
-      (just-one-space)))
+  (when (re-search-forward "[ >]*" nil t)
+    (replace-match " " nil t))
   (end-of-line)
   (gin-do-auto-fill))
 ;; Au niveau du mapping, c'est un peu tricky. Je n'ai pas trouvé le