From 3284522622938430722ff935cf6cf57739b75c1e Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 19 Feb 2009 22:14:12 +0000 Subject: [PATCH] (rst-mode-abbrev-table): Mark entries as `system'. --- lisp/ChangeLog | 4 ++++ lisp/textmodes/rst.el | 16 ++++++++-------- 2 files changed, 12 insertions(+), 8 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index aaf4c25b7f7..a3d7cac5d45 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-02-19 Stefan Monnier + + * textmodes/rst.el (rst-mode-abbrev-table): Mark entries as `system'. + 2009-02-19 Andreas Schwab * term.el: Remap self-insert-command to term-send-raw in diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el index 87760bb6b94..de2a5350f3c 100644 --- a/lisp/textmodes/rst.el +++ b/lisp/textmodes/rst.el @@ -310,14 +310,14 @@ This inherits from Text mode.") (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) - ;; FIXME: Add footnotes, links, and more. - )) + (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. -- 2.11.4.GIT