Function: message-unbold-region

message-unbold-region is an interactive and byte-compiled function defined in message.el.gz.

Signature

(message-unbold-region START END)

Documentation

Remove all boldness (overstruck characters) in the region.

Called from program, takes two arguments START and END which specify the range to operate on.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
;;;###autoload
(defun message-unbold-region (start end)
  "Remove all boldness (overstruck characters) in the region.
Called from program, takes two arguments START and END
which specify the range to operate on."
  (interactive "r")
  (save-excursion
    (let ((end1 (make-marker)))
      (move-marker end1 (max start end))
      (goto-char (min start end))
      (while (search-forward "\b" end1 t)
	(if (eq (char-after) (char-after (- (point) 2)))
	    (delete-char -2))))))