# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 894404243 0
# Node ID e71c5e32d38533e3b0179ce9d3c917c002aec57d
# Parent  ab7fa71c0957c3379bc23f62a4c19a4cc657ff95
(tmm-get-keymap): Fix previous change;
access the equiv string from the cache properly.

diff -r ab7fa71c0957 -r e71c5e32d385 lisp/tmm.el
--- a/lisp/tmm.el	Tue May 05 21:29:28 1998 +0000
+++ b/lisp/tmm.el	Tue May 05 21:37:23 1998 +0000
@@ -429,8 +429,8 @@
 	       (setq str (nth 1 elt))
 	       (and str
 		    (consp (nth 3 elt))
-		    (stringp (cdr (car (nth 3 elt)))) ; keyseq cache
-		    (setq cache (cdr (car (nth 3 elt))))
+		    (stringp (cdr (nth 3 elt))) ; keyseq cache
+		    (setq cache (cdr (nth 3 elt)))
 		    cache
 		    (setq str (concat str cache))))
 	      ((if (listp (cdr-safe (cdr-safe (cdr-safe elt))))