>>867
(replace-string "^M^M^M" "^M")
^M は C-q RET でいいんじゃねーの?