]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/byte-run.el
Go back to grave quoting in source-code docstrings etc.
[gnu-emacs] / lisp / emacs-lisp / byte-run.el
index 3c561db4b81959449e98e4d6d80de7e6592407e5..73c2977e8eb07a3110d6854862eafe8bafae603d 100644 (file)
@@ -267,7 +267,7 @@ The return value is undefined.
                                 (cdr body)
                               body)))
                     nil)
-                   (t (message "Warning: Unknown defun property ā€˜%Sā€™ in %S"
+                   (t (message "Warning: Unknown defun property `%S' in %S"
                                (car x) name)))))
                    decls))
           (def (list 'defalias
@@ -317,7 +317,7 @@ The return value is undefined.
   (declare (debug defun) (doc-string 3))
   (or (memq (get name 'byte-optimizer)
            '(nil byte-compile-inline-expand))
-      (error "ā€˜%sā€™ is a primitive" name))
+      (error "`%s' is a primitive" name))
   `(prog1
        (defun ,name ,arglist ,@body)
      (eval-and-compile