Mercurial > emacs

diff lisp/abbrev.el @ 86158:61154518604b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(abbrev--write): Fix error in transcription from C.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 16 Nov 2007 18:27:07 +0000
parents dd802e6c104e
children 93c3f233e481
line wrap: on
line diff
--- a/lisp/abbrev.el	Fri Nov 16 18:07:14 2007 +0000
+++ b/lisp/abbrev.el	Fri Nov 16 18:27:07 2007 +0000
@@ -825,7 +825,7 @@
 Presumes that `standard-output' points to `current-buffer'."
   (unless (or (null (symbol-value sym)) (abbrev-get sym :system))
     (insert "    (")
-    (prin1 sym)
+    (prin1 (symbol-name sym))
     (insert " ")
     (prin1 (symbol-value sym))
     (insert " ")