Simplify the interactive form of easy-kill-thing

diff --git a/easy-kill.el b/easy-kill.el
index 18958668213d901eab198f3be32db1b13cfee444..a2085941729321824e7f0b265c389665417221d0 100644 (file)
--- a/easy-kill.el
+++ b/easy-kill.el
@@ -154,9 +154,7 @@ candidate property instead."
 (defun easy-kill-thing (&optional thing n nomsg inhibit-handler)
   ;; N can be -, + and digits
   (interactive
-   (list (cdr (assoc (car (last (listify-key-sequence
-                                 (single-key-description last-command-event))))
-                     easy-kill-alist))
+   (list (cdr (assq last-command-event easy-kill-alist))
          (prefix-numeric-value current-prefix-arg)))
   (let ((thing (or thing (overlay-get easy-kill-candidate 'thing)))
         (n (or n 1)))