diff options
| -rw-r--r-- | lisp/emacs-lisp/re-builder.el | 8 |
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) |