(save-restriction
(narrow-to-region start end)
(goto-char (point-min))
+ (while (re-search-forward "=\n" nil t)
+ (replace-match "")
+ )
+ (goto-char (point-min))
(while (search-forward "=" nil t)
(let ((beg (match-beginning 0)))
(cond ((looking-at "\n")