From 7362a02734101841ce1c38e30b3ef37e7462dd01 Mon Sep 17 00:00:00 2001 From: ueno Date: Thu, 18 Jan 2007 23:26:24 +0000 Subject: [PATCH] Fixed a typo. --- lisp/riece-mcat.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/riece-mcat.el b/lisp/riece-mcat.el index e1b5cbb..99cfc9e 100644 --- a/lisp/riece-mcat.el +++ b/lisp/riece-mcat.el @@ -38,7 +38,7 @@ (while pointer (if (equal (car pointer) (nth 1 pointer)) - (setcdr pointer (nth 2 pointer)) + (setcdr pointer (nthcdr 2 pointer)) (unless (assoc (car pointer) alist) (setq alist (cons (list (car pointer)) alist)))) (setq pointer (cdr pointer))) -- 1.7.10.4