[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog abbrev.el
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog abbrev.el |
Date: |
Tue, 04 Aug 2009 20:06:07 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Chong Yidong <cyd> 09/08/04 20:06:06
Modified files:
lisp : ChangeLog abbrev.el
Log message:
* abbrev.el (insert-abbrev-table-description): Prettify output.
Suggested by Karl Chen.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15895&r2=1.15896
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/abbrev.el?cvsroot=emacs&r1=1.81&r2=1.82
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15895
retrieving revision 1.15896
diff -u -b -r1.15895 -r1.15896
--- ChangeLog 4 Aug 2009 17:03:54 -0000 1.15895
+++ ChangeLog 4 Aug 2009 20:06:03 -0000 1.15896
@@ -1,3 +1,8 @@
+2009-08-04 Chong Yidong <address@hidden>
+
+ * abbrev.el (insert-abbrev-table-description): Prettify output.
+ Suggested by Karl Chen.
+
2009-08-04 Dmitry Dzhus <address@hidden>
* progmodes/gdb-mi.el (gdb-frame-number): Initialize with nil.
Index: abbrev.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/abbrev.el,v
retrieving revision 1.81
retrieving revision 1.82
diff -u -b -r1.81 -r1.82
--- abbrev.el 13 May 2009 01:13:51 -0000 1.81
+++ abbrev.el 4 Aug 2009 20:06:06 -0000 1.82
@@ -887,9 +887,11 @@
(insert "\n\n"))
(insert "(define-abbrev-table '")
(prin1 name)
- (insert " '(")
+ (if (null symbols)
+ (insert " '())\n\n")
+ (insert "\n '(\n")
(mapc 'abbrev--write symbols)
- (insert " ))\n\n"))
+ (insert " ))\n\n")))
nil)))
(put 'define-abbrev-table 'doc-string-elt 3)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp ChangeLog abbrev.el,
Chong Yidong <=