]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/ring.el
Go back to grave quoting in source-code docstrings etc.
[gnu-emacs] / lisp / emacs-lisp / ring.el
index 8badac391c7b8fea909392c516f5b139eab72037..2447dfa8e382f5b7c50d0b2d26e1de67d7fc14c9 100644 (file)
@@ -175,14 +175,14 @@ Comparison is done via `equal'.  The index is 0-based."
   "Return the next item in the RING, after ITEM.
 Raise error if ITEM is not in the RING."
   (let ((curr-index (ring-member ring item)))
-    (unless curr-index (error "Item is not in the ring: ā€˜%sā€™" item))
+    (unless curr-index (error "Item is not in the ring: `%s'" item))
     (ring-ref ring (ring-plus1 curr-index (ring-length ring)))))
 
 (defun ring-previous (ring item)
   "Return the previous item in the RING, before ITEM.
 Raise error if ITEM is not in the RING."
   (let ((curr-index (ring-member ring item)))
-    (unless curr-index (error "Item is not in the ring: ā€˜%sā€™" item))
+    (unless curr-index (error "Item is not in the ring: `%s'" item))
     (ring-ref ring (ring-minus1 curr-index (ring-length ring)))))
 
 (defun ring-extend (ring x)