From 1ba983e8d9da561ccbdf15fb1544895fad40cce8 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 9 Jan 2009 04:23:38 +0000 Subject: Replace last-command-char with last-command-event. --- lisp/play/mpuz.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/play/mpuz.el') diff --git a/lisp/play/mpuz.el b/lisp/play/mpuz.el index 5c03e7a09d2..5725bc1d825 100644 --- a/lisp/play/mpuz.el +++ b/lisp/play/mpuz.el @@ -1,7 +1,7 @@ ;;; mpuz.el --- multiplication puzzle for GNU Emacs -;; Copyright (C) 1990, 2001, 2002, 2003, 2004, 2005, -;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1990, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, +;; 2009 Free Software Foundation, Inc. ;; Author: Philippe Schnoebelen ;; Overhauled: Daniel Pfeiffer @@ -424,7 +424,7 @@ You may abort a game by typing \\\\[mpuz-offer-abort]." (interactive) (if mpuz-in-progress (let (letter-char digit digit-char message) - (setq letter-char (upcase last-command-char) + (setq letter-char (upcase last-command-event) digit (mpuz-to-digit (- letter-char ?A))) (cond ((mpuz-digit-solved-p digit) (message "%c already solved." letter-char) -- cgit v1.2.3-70-g09d2