From bc775a067ee492f2dd52d594805ebef30681485d Mon Sep 17 00:00:00 2001
From: yamaoka <yamaoka>
Date: Thu, 22 Jul 1999 10:47:08 +0000
Subject: [PATCH] (string-compare-from-top): Don't use `aref'.

---
 mu-cite.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mu-cite.el b/mu-cite.el
index de6083a..c2fa92b 100644
--- a/mu-cite.el
+++ b/mu-cite.el
@@ -535,8 +535,8 @@ TABLE defaults to the current buffer's category table."
 	 c1 c2)
     (while (and (< p len)
 		(progn
-		  (setq c1 (aref str1 p)
-			c2 (aref str2 p))
+		  (setq c1 (sref str1 p)
+			c2 (sref str2 p))
 		  (eq c1 c2)))
       (setq p (char-next-index c1 p)))
     (and (> p 0)
-- 
1.7.10.4