From d5d1f5fdd81fbbda4e43a4c04dbf6e111fa78d48 Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Sat, 20 Oct 2007 06:53:06 +0000 Subject: [PATCH] * play/decipher.el (decipher-keypress): Use forward-line. --- lisp/ChangeLog | 1 + lisp/play/decipher.el | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ca1bdb0b0df..1e20685832e 100644 --- a/lisp/ChangeLog +++ b/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): diff --git a/lisp/play/decipher.el b/lisp/play/decipher.el index 6b1644d58b0..930cee7f9d5 100644 --- a/lisp/play/decipher.el +++ b/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))) -- 2.39.2