[Emacs-diffs] Changes to emacs/lisp/play/gamegrid.el

[Richard M. Stallman]

Index: emacs/lisp/play/gamegrid.el
diff -c emacs/lisp/play/gamegrid.el:1.4 emacs/lisp/play/gamegrid.el:1.5
*** emacs/lisp/play/gamegrid.el:1.4     Wed Feb  6 06:34:07 2002
--- emacs/lisp/play/gamegrid.el Sun Mar  3 09:13:53 2002
***************
*** 145,151 ****
    (if gamegrid-font
        (condition-case nil
          (set-face-font face gamegrid-font)
!       ('error nil))))
  
  (defun gamegrid-setup-face (face color)
    (set-face-foreground face color)
--- 145,151 ----
    (if gamegrid-font
        (condition-case nil
          (set-face-font face gamegrid-font)
!       (error nil))))
  
  (defun gamegrid-setup-face (face color)
    (set-face-foreground face color)
***************
*** 153,168 ****
    (gamegrid-set-font face)
    (condition-case nil
        (set-face-background-pixmap face [nothing]);; XEmacs
!     ('error nil))
    (condition-case nil
        (set-face-background-pixmap face nil);; Emacs
!     ('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))
      face))
  
  (defun gamegrid-make-color-tty-face (color)
--- 153,168 ----
    (gamegrid-set-font face)
    (condition-case nil
        (set-face-background-pixmap face [nothing]);; XEmacs
!     (error nil))
    (condition-case nil
        (set-face-background-pixmap face nil);; Emacs
!     (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))
      face))
  
  (defun gamegrid-make-color-tty-face (color)