From 6d09f08bbf3766cc0aa47492a478dd75b5964d89 Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Date: Thu, 25 Feb 2010 22:32:41 +0100
Subject: [PATCH] Fixed typo in ecl_nbutlast

---
 src/c/list.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/c/list.d b/src/c/list.d
index 376607b84..07fd8fb97 100644
--- a/src/c/list.d
+++ b/src/c/list.d
@@ -626,7 +626,7 @@ ecl_nbutlast(cl_object l, cl_index n)
 {
 	cl_object r;
 	if (!LISTP(l))
-                FEwrong_type_only_arg(@'nbutlast', x, @'list');
+                FEwrong_type_only_arg(@'nbutlast', l, @'list');
 	for (n++, r = l; n && CONSP(r); n--, r = ECL_CONS_CDR(r))
 		;
 	if (n == 0) {