Function: reb-insert-regexp

reb-insert-regexp is a byte-compiled function defined in re-builder.el.gz.

Signature

(reb-insert-regexp)

Documentation

Insert current RE.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/re-builder.el.gz
(defun reb-insert-regexp ()
  "Insert current RE."
  (let ((re (or (reb-target-value 'reb-regexp)
		(reb-empty-regexp))))
  (cond ((eq reb-re-syntax 'read)
	 (print re (current-buffer)))
	((eq reb-re-syntax 'string)
	 (insert "\n\"" re "\""))
	;; For the Lisp syntax we need the "source" of the regexp
	((reb-lisp-syntax-p)
	 (insert (or (reb-target-value 'reb-regexp-src)
		     (reb-empty-regexp)))))))