(pong-init-buffer): Fill buffer with spaces instead of ^A.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5fd90145462a1fcfcd76fa7a392d62d532f8a05e..2b3d6d5413cdfb17d0a2f9857653569d24b8b41f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2006-06-09  Micha\e,Ak\e(Bl Cadilhac  <michael.cadilhac@lrde.org>
 
+       * play/pong.el (pong-init-buffer):
+       Fill buffer with spaces instead of ^A.
+
        * 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

diff --git a/lisp/play/pong.el b/lisp/play/pong.el
index d73d789d0d38b33959d54d67939c3035026b1fef..4efa8c2a639d21e2775d5ccf87649bd09db469bb 100644 (file)
--- a/lisp/play/pong.el
+++ b/lisp/play/pong.el
@@ -244,7 +244,7 @@
 
   (gamegrid-init-buffer pong-width
                        (+ 2 pong-height)
-                       1)
+                       ?\s)
 
   (let ((buffer-read-only nil))
     (loop for y from 0 to (1- pong-height) do