From e486b005a9f863fed5ce7a8a2aec48bae34f4b41 Mon Sep 17 00:00:00 2001
From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 5 Nov 2007 04:28:32 +0000
Subject: [PATCH] (abbrev--write): Fix up typo.

---
 lisp/ChangeLog | 4 ++++
 lisp/abbrev.el | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7eb8ecfa4e3..ab52e8c6f84 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-11-05  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* abbrev.el (abbrev--write): Fix up typo.
+
 2007-11-04  Juanma Barranquero  <lekktu@gmail.com>
 
 	* abbrev.el (define-abbrev-table): Doc fix.
diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index 65890beef0c..145ec223951 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 name)
+    (prin1 sym)
     (insert " ")
     (prin1 (symbol-value sym))
     (insert " ")
-- 
2.39.2