text-quoting-style in emacs-lisp diagnostics

[gnu-emacs] / lisp / emacs-lisp / testcover.el

diff --git a/lisp/emacs-lisp/testcover.el b/lisp/emacs-lisp/testcover.el
index 110c63f777ab4fd1c2de04477d81fe5994c74fec..3e6039ee9fd35fa459a8f05f021aa825b29c3a96 100644 (file)
--- a/lisp/emacs-lisp/testcover.el
+++ b/lisp/emacs-lisp/testcover.el
@@ -475,7 +475,7 @@ same value during coverage testing."
     (aset testcover-vector idx (cons '1value val)))
    ((not (and (eq (car-safe (aref testcover-vector idx)) '1value)
              (equal (cdr (aref testcover-vector idx)) val)))
-    (error "Value of form marked with `1value' does vary: %s" val)))
+    (error "Value of form marked with ‘1value’ does vary: %s" val)))
   val)