(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 4d5c3d1b2ca81ca8cbdaf125f6d8a5005d6158df..95a29ae4926c9ead982b74b73c382cf0fe2b691c 100644 (file)
--- 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 906ea61ae494fc42cbb35beded5cc459c0db67e8..2ff50ad53eb2d714fc823bbd5ffbf66bffe4fe17 100644 (file)
--- 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)