Small patch for pong.el.

[Michaël Cadilhac]

M-x pong filled the buffer with ^A characters at init, it should use
spaces.

TIA.

Index: lisp/ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.9696
diff -c -r1.9696 ChangeLog
*** lisp/ChangeLog      9 Jun 2006 13:03:18 -0000       1.9696
--- lisp/ChangeLog      9 Jun 2006 13:36:04 -0000
***************
*** 1,5 ****
--- 1,10 ----
+ 2006-06-09  Michaël Cadilhac  <address@hidden>
+ 
+       * play/pong.el (pong-init-buffer): Fill buffer with spaces instead
+       of ^A.
+ 
  2006-06-09  Michaël Cadilhac  <address@hidden>
  
        * textmodes/ispell.el (ispell-kill-ispell): If ispell has been
        launched asynchronously, delete its process instead of being cool.
        (ispell-async-processp): Check for `delete-process' existence
Index: lisp/play/pong.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/play/pong.el,v
retrieving revision 1.17
diff -c -r1.17 pong.el
*** lisp/play/pong.el   5 Feb 2006 14:10:44 -0000       1.17
--- lisp/play/pong.el   9 Jun 2006 13:36:04 -0000
***************
*** 244,250 ****
  
    (gamegrid-init-buffer pong-width
                        (+ 2 pong-height)
!                       1)
  
    (let ((buffer-read-only nil))
      (loop for y from 0 to (1- pong-height) do
--- 244,250 ----
  
    (gamegrid-init-buffer pong-width
                        (+ 2 pong-height)
!                       ?\s)
  
    (let ((buffer-read-only nil))
      (loop for y from 0 to (1- pong-height) do


-- 
 |      Michaël `Micha' Cadilhac   |  Si les religions etaient aussi tole-  |
 |         Epita/LRDE Promo 2007   |  rantes qu'elles le pretendent, il y   |
 | http://www.lrde.org/~cadilh_m   |  a longtemps qu'il n'y en aurait plus  |
 `--  -   JID: address@hidden --'           -- Moustic              -  --'

pgpzBjCNPWAa2.pgp
Description: PGP signature