From c1bfdd54476490681e10a8eb935e7ed91449dc8c Mon Sep 17 00:00:00 2001
From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Thu, 15 Jan 2004 14:18:24 +0000
Subject: [PATCH] (scheme-font-lock-keywords-2): Add "force".

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9d0c92f5109..bcef05f4f1f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-01-15  Thien-Thi Nguyen  <ttn@gnu.org>
+
+	* progmodes/scheme.el (scheme-font-lock-keywords-2): Add "force".
+
 2004-01-14  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* mwheel.el (mouse-wheel-down-event, mouse-wheel-up-event):
diff --git a/lisp/progmodes/scheme.el b/lisp/progmodes/scheme.el
index d85c2ba9db2..13dd790b6a0 100644
--- a/lisp/progmodes/scheme.el
+++ b/lisp/progmodes/scheme.el
@@ -328,7 +328,7 @@ See `run-hooks'."
 	       "do" "else" "for-each" "if" "lambda"
 	       "let" "let*" "let-syntax" "letrec" "letrec-syntax"
 	       ;; Hannes Haug <hannes.haug@student.uni-tuebingen.de> wants:
-	       "and" "or" "delay"
+	       "and" "or" "delay" "force"
 	       ;; Stefan Monnier <stefan.monnier@epfl.ch> says don't bother:
 	       ;;"quasiquote" "quote" "unquote" "unquote-splicing"
 	       "map" "syntax" "syntax-rules") t)
-- 
2.39.2