From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 3 Mar 2002 14:14:38 +0000 (+0000)
Subject: (gamegrid-set-font, gamegrid-setup-face)
X-Git-Tag: ttn-vms-21-2-B4~16385
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=279b254c999302cbaace3aa924a6193adc1ddf90;p=emacs.git

(gamegrid-set-font, gamegrid-setup-face)
(gamegrid-make-mono-tty-face): Fix usage of condition-case.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4d5c3d1b2ca..95a29ae4926 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2002-03-03  Richard M. Stallman  <rms@gnu.org>
+
+	* play/snake.el (snake-score-file): Put in home dir, not in /tmp.
+
+	* play/gamegrid.el (gamegrid-set-font, gamegrid-setup-face) 
+	(gamegrid-make-mono-tty-face): Fix usage of condition-case.
+
 2002-03-03  Thien-Thi Nguyen  <ttn@gnu.org>
 
 	* calendar/diary-lib.el (list-diary-entries): Use
diff --git a/lisp/play/gamegrid.el b/lisp/play/gamegrid.el
index 906ea61ae49..2ff50ad53eb 100644
--- a/lisp/play/gamegrid.el
+++ b/lisp/play/gamegrid.el
@@ -145,7 +145,7 @@ static char *noname[] = {
   (if gamegrid-font
       (condition-case nil
 	  (set-face-font face gamegrid-font)
-	('error nil))))
+	(error nil))))
 
 (defun gamegrid-setup-face (face color)
   (set-face-foreground face color)
@@ -153,16 +153,16 @@ static char *noname[] = {
   (gamegrid-set-font face)
   (condition-case nil
       (set-face-background-pixmap face [nothing]);; XEmacs
-    ('error nil))
+    (error nil))
   (condition-case nil
       (set-face-background-pixmap face nil);; Emacs
-    ('error nil)))
+    (error nil)))
 
 (defun gamegrid-make-mono-tty-face ()
   (let ((face (make-face 'gamegrid-mono-tty-face)))
     (condition-case nil
 	(set-face-property face 'reverse t)
-      ('error nil))
+      (error nil))
     face))
 
 (defun gamegrid-make-color-tty-face (color)