diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-11-16 18:27:07 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-11-16 18:27:07 +0000 |
commit | d548715ceb4a2dcbc7d82100a490b9aa2913d4e4 (patch) | |
tree | 204e5a417dad6acda0594632cd35bbc00b990cbc | |
parent | e85c6b7cee2c5a0cb523ab09ee069043a10c4e41 (diff) | |
download | emacs-d548715ceb4a2dcbc7d82100a490b9aa2913d4e4.tar.gz |
(abbrev--write): Fix error in transcription from C.
-rw-r--r-- | lisp/ChangeLog | 2 | ||||
-rw-r--r-- | lisp/abbrev.el | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b806ac23302..ccd62fa9e36 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2007-11-16 Stefan Monnier <monnier@iro.umontreal.ca> + * abbrev.el (abbrev--write): Fix error in transcription from C. + * emulation/pc-select.el (pc-select-shifted-mark): Remove. (pc-select-ensure-mark): Set mark-active to a special value instead. Rename from ensure-mark. Update call callers. diff --git a/lisp/abbrev.el b/lisp/abbrev.el index 0c140a84159..b6167d2c1a5 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -825,7 +825,7 @@ Only writes the non-system abbrevs. 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 " ") |