aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2005-02-27 10:35:51 +0000
committerRichard M. Stallman2005-02-27 10:35:51 +0000
commite342a48a657eae5dfba0dd5882dc935f694769bb (patch)
tree4a41e8af7f9c3052a242c1a4f0a77ffe98987f21
parent9c7cc04bffffc21dd864b384e9c7a612515c2643 (diff)
downloademacs-e342a48a657eae5dfba0dd5882dc935f694769bb.tar.gz
emacs-e342a48a657eae5dfba0dd5882dc935f694769bb.zip
(regexp-builder): New function.
-rw-r--r--lisp/emacs-lisp/re-builder.el8
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el
index 019a45213c8..d26a0ae5f38 100644
--- a/lisp/emacs-lisp/re-builder.el
+++ b/lisp/emacs-lisp/re-builder.el
@@ -327,10 +327,16 @@ Except for Lisp syntax this is the same as `reb-regexp'.")
327 "Return binding for SYMBOL in the RE Builder target buffer." 327 "Return binding for SYMBOL in the RE Builder target buffer."
328 `(with-current-buffer reb-target-buffer ,symbol)) 328 `(with-current-buffer reb-target-buffer ,symbol))
329 329
330;;; This is to help people find this in Apropos.
331;;;###autoload
332(defun regexp-builder ()
333 "Alias for `re-builder': Construct a regexp interactively."
334 (interactive)
335 (re-builder))
330 336
331;;;###autoload 337;;;###autoload
332(defun re-builder () 338(defun re-builder ()
333 "Call up the RE Builder for the current window." 339 "Construct a regexp interactively."
334 (interactive) 340 (interactive)
335 341
336 (if (and (string= (buffer-name) reb-buffer) 342 (if (and (string= (buffer-name) reb-buffer)