diff options
| author | Arash Esbati | 2021-10-08 11:12:30 +0200 |
|---|---|---|
| committer | Tassilo Horn | 2021-10-08 12:31:40 +0200 |
| commit | 915e044d60dfde0953327cb9cbfe8bb0f69e5dd4 (patch) | |
| tree | cbe1780a3db38f77a918ed44be6502a77ad6cc29 | |
| parent | 6e83a4100a7c4d528a1b88dab49327102f833c4a (diff) | |
| download | emacs-915e044d60dfde0953327cb9cbfe8bb0f69e5dd4.tar.gz emacs-915e044d60dfde0953327cb9cbfe8bb0f69e5dd4.zip | |
Use the correct label in the warning
* lisp/textmodes/reftex-toc.el (reftex-toc-rename-label): Add
missing space in the prompt. Use the new user defined label in
the warning (bug#36235).
| -rw-r--r-- | lisp/textmodes/reftex-toc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/reftex-toc.el b/lisp/textmodes/reftex-toc.el index 7ca2fb827e8..26ae8338283 100644 --- a/lisp/textmodes/reftex-toc.el +++ b/lisp/textmodes/reftex-toc.el | |||
| @@ -856,10 +856,10 @@ label prefix determines the wording of a reference." | |||
| 856 | (label (car toc)) newlabel) | 856 | (label (car toc)) newlabel) |
| 857 | (if (not (stringp label)) | 857 | (if (not (stringp label)) |
| 858 | (error "This is not a label entry")) | 858 | (error "This is not a label entry")) |
| 859 | (setq newlabel (read-string (format "Rename label \"%s\" to:" label))) | 859 | (setq newlabel (read-string (format "Rename label \"%s\" to :" label))) |
| 860 | (if (assoc newlabel (symbol-value reftex-docstruct-symbol)) | 860 | (if (assoc newlabel (symbol-value reftex-docstruct-symbol)) |
| 861 | (if (not (y-or-n-p | 861 | (if (not (y-or-n-p |
| 862 | (format-message "Label `%s' exists. Use anyway? " label))) | 862 | (format-message "Label `%s' exists. Use anyway? " newlabel))) |
| 863 | (error "Abort"))) | 863 | (error "Abort"))) |
| 864 | (save-excursion | 864 | (save-excursion |
| 865 | (save-window-excursion | 865 | (save-window-excursion |