[Emacs-diffs] emacs/lisp ChangeLog textmodes/rst.el

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        09/02/19 22:14:15

Modified files:
        lisp           : ChangeLog 
        lisp/textmodes : rst.el 

Log message:
        (rst-mode-abbrev-table): Mark entries as `system'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15358&r2=1.15359
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/textmodes/rst.el?cvsroot=emacs&r1=1.10&r2=1.11

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15358
retrieving revision 1.15359
diff -u -b -r1.15358 -r1.15359
--- ChangeLog   19 Feb 2009 17:15:58 -0000      1.15358
+++ ChangeLog   19 Feb 2009 22:14:12 -0000      1.15359
@@ -1,3 +1,7 @@
+2009-02-19  Stefan Monnier  <address@hidden>
+
+       * textmodes/rst.el (rst-mode-abbrev-table): Mark entries as `system'.
+
 2009-02-19  Andreas Schwab  <address@hidden>
 
        * term.el: Remap self-insert-command to term-send-raw in

Index: textmodes/rst.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/rst.el,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -b -r1.10 -r1.11
--- textmodes/rst.el    5 Jan 2009 03:24:11 -0000       1.10
+++ textmodes/rst.el    19 Feb 2009 22:14:15 -0000      1.11
@@ -310,14 +310,14 @@
 (defvar rst-mode-abbrev-table nil
   "Abbrev table used while in Rst mode.")
 (define-abbrev-table 'rst-mode-abbrev-table
-  '(
-    ("contents" ".. contents::\n..\n   " nil 0)
-    ("con" ".. contents::\n..\n   " nil 0)
-    ("cont" "[...]" nil 0)
-    ("skip" "\n\n[...]\n\n  " nil 0)
-    ("seq" "\n\n[...]\n\n  " nil 0)
+  (mapcar (lambda (x) (append x '(nil 0 system)))
+          '(("contents" ".. contents::\n..\n   ")
+            ("con" ".. contents::\n..\n   ")
+            ("cont" "[...]")
+            ("skip" "\n\n[...]\n\n  ")
+            ("seq" "\n\n[...]\n\n  ")
     ;; FIXME: Add footnotes, links, and more.
-    ))
+            )))
 
 
 ;; Syntax table.