(setq newlabel (read-string (format "Rename label \"%s\" to:" label)))
(if (assoc newlabel (symbol-value reftex-docstruct-symbol))
(if (not (y-or-n-p
- (format "Label '%s' exists. Use anyway? " label)))
+ (format-message "Label ā%sā exists. Use anyway? " label)))
(error "Abort")))
(save-excursion
(save-window-excursion