* play/decipher.el (decipher-keypress): Use forward-line.

lisp/ChangeLog

@@ -9,6 +9,7 @@
 	(compilation-skip-threshold, compilation-skip-visited): Move
 	definitions earlier.
 
+	* play/decipher.el (decipher-keypress):
 	* play/zone.el (zone-fall-through-ws):
 	* play/landmark.el (lm-move-down, lm-move-up):
 	* play/handwrite.el (handwrite):

lisp/play/decipher.el

@@ -352,7 +352,7 @@ The most useful commands are:
                (t
                 (error "Bad location")))))
           (let (goal-column)
-            (previous-line 1)))
+            (forward-line -1)))
       (let ((char-a (following-char))
             (char-b (decipher-last-command-char)))
         (or (and (not (= ?w (char-syntax char-a)))