From: Mauro Aranda <maurooaranda@gmail.com>
Date: Wed, 7 Aug 2019 14:55:54 +0000 (-0300)
Subject: Fix docstrings in pong
X-Git-Tag: emacs-26.3~18
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fae1ff6;p=emacs.git

Fix docstrings in pong

* lisp/play/pong.el (pong-move-left pong-move-right): Refer to the
right bats and directions of movement.  (Bug#36959)
---

diff --git a/lisp/play/pong.el b/lisp/play/pong.el
index 555c1939d26..13fe8b82a41 100644
--- a/lisp/play/pong.el
+++ b/lisp/play/pong.el
@@ -262,7 +262,7 @@
 
 
 (defun pong-move-left ()
-  "Move bat 2 up.
+  "Move bat 1 up.
 This is called left for historical reasons, since in some pong
 implementations you move with left/right paddle."
   (interactive)
@@ -274,7 +274,7 @@ implementations you move with left/right paddle."
 
 
 (defun pong-move-right ()
-  "Move bat 2 up."
+  "Move bat 1 down."
   (interactive)
   (if (< (+ pong-bat-player1 pong-bat-width) (1- pong-height))
       (and