diff src/casefiddle.c @ 272:c5d627a313b1 r21-0b34

Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 169c0442b401
children 6cb5e14cd98e
line wrap: on
line diff
--- a/src/casefiddle.c	Mon Aug 13 10:27:41 2007 +0200
+++ b/src/casefiddle.c	Mon Aug 13 10:28:48 2007 +0200
@@ -56,7 +56,7 @@
       if (STRINGP (obj))
 	{
 	  Charcount i;
-	  Charcount len = string_char_length (XSTRING (obj));
+	  Charcount len = XSTRING_CHAR_LENGTH (obj);
 	  obj = Fcopy_sequence (obj);
 	  for (i = 0; i < len; i++)
 	    {