diff options
| author | Lars Ingebrigtsen | 2019-07-09 03:25:42 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-07-09 03:44:13 +0200 |
| commit | 733f30b4cb3ab3dda8a4a59bd9cb224bb01048de (patch) | |
| tree | 0247c7bd5ab51f6390b39f6f755dc60272cc4e40 | |
| parent | 97190675c87375bfe1d92b29b01933f875033de7 (diff) | |
| download | emacs-733f30b4cb3ab3dda8a4a59bd9cb224bb01048de.tar.gz emacs-733f30b4cb3ab3dda8a4a59bd9cb224bb01048de.zip | |
Tweak messaging in re-builder
* lisp/emacs-lisp/re-builder.el (reb-copy): Say what we copied to
the kill ring.
| -rw-r--r-- | lisp/emacs-lisp/re-builder.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el index cc432e7cb45..961d26a7212 100644 --- a/lisp/emacs-lisp/re-builder.el +++ b/lisp/emacs-lisp/re-builder.el | |||
| @@ -455,7 +455,7 @@ matching parts of the target buffer will be highlighted." | |||
| 455 | (setq re (substring re 1 (1- (length re)))) | 455 | (setq re (substring re 1 (1- (length re)))) |
| 456 | (setq re (replace-regexp-in-string "\n" "\\n" re nil t)) | 456 | (setq re (replace-regexp-in-string "\n" "\\n" re nil t)) |
| 457 | (kill-new re) | 457 | (kill-new re) |
| 458 | (message "Regexp copied to kill-ring"))) | 458 | (message "Copied regexp `%s' to kill-ring" re))) |
| 459 | 459 | ||
| 460 | ;; The subexpression mode is not electric because the number of | 460 | ;; The subexpression mode is not electric because the number of |
| 461 | ;; matches should be seen rather than a prompt. | 461 | ;; matches should be seen rather than a prompt. |