Function: ununderline-region

ununderline-region is an autoloaded, interactive and byte-compiled function defined in underline.el.gz.

Signature

(ununderline-region START END)

Documentation

Remove all underlining (overstruck underscores) 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/textmodes/underline.el.gz
;;;###autoload
(defun ununderline-region (start end)
  "Remove all underlining (overstruck underscores) 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 (re-search-forward "_\b\\|\b_" end1 t)
       (delete-char -2)))))