From e93c003eb15f85f744a39c28a8fb43b8c6da9904 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Fri, 9 Jan 2009 03:57:12 +0000
Subject: Replace last-command-char with last-command-event.

---
 lisp/calc/calc-sel.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lisp/calc/calc-sel.el')

diff --git a/lisp/calc/calc-sel.el b/lisp/calc/calc-sel.el
index 5a3e4333471..179d1e1abfe 100644
--- a/lisp/calc/calc-sel.el
+++ b/lisp/calc/calc-sel.el
@@ -132,7 +132,7 @@
 
 (defun calc-select-part (num)
   (interactive "P")
-  (or num (setq num (- last-command-char ?0)))
+  (or num (setq num (- last-command-event ?0)))
   (calc-wrapper
    (calc-prepare-selection)
    (let ((sel (calc-find-nth-part (or (nth 2 calc-selection-cache-entry)
-- 
cgit v1.2.1