Use correct extent value when calling GetMagickToken.
diff --git a/MagickCore/coder.c b/MagickCore/coder.c
index 88f2bbf..e04c5c6 100644
--- a/MagickCore/coder.c
+++ b/MagickCore/coder.c
@@ -776,7 +776,7 @@
 %                                                                             %
 %                                                                             %
 %                                                                             %
-+   L o a d C o d e r L i s t                                                 %
++   L o a d C o d e r C a c h e                                               %
 %                                                                             %
 %                                                                             %
 %                                                                             %
@@ -819,6 +819,9 @@
   MagickStatusType
     status;
 
+  size_t
+    extent;
+
   /*
     Load the coder map file.
   */
@@ -829,12 +832,13 @@
   status=MagickTrue;
   coder_info=(CoderInfo *) NULL;
   token=AcquireString(xml);
+  extent=strlen(token)+MagickPathExtent;
   for (q=(char *) xml; *q != '\0'; )
   {
     /*
       Interpret XML.
     */
-    GetMagickToken(q,&q,MagickPathExtent,token);
+    GetMagickToken(q,&q,extent,token);
     if (*token == '\0')
       break;
     (void) CopyMagickString(keyword,token,MagickPathExtent);
@@ -844,7 +848,7 @@
           Doctype element.
         */
         while ((LocaleNCompare(q,"]>",2) != 0) && (*q != '\0'))
-          GetMagickToken(q,&q,MagickPathExtent,token);
+          GetMagickToken(q,&q,extent,token);
         continue;
       }
     if (LocaleNCompare(keyword,"<!--",4) == 0)
@@ -853,7 +857,7 @@
           Comment element.
         */
         while ((LocaleNCompare(q,"->",2) != 0) && (*q != '\0'))
-          GetMagickToken(q,&q,MagickPathExtent,token);
+          GetMagickToken(q,&q,extent,token);
         continue;
       }
     if (LocaleCompare(keyword,"<include") == 0)
@@ -864,10 +868,10 @@
         while (((*token != '/') && (*(token+1) != '>')) && (*q != '\0'))
         {
           (void) CopyMagickString(keyword,token,MagickPathExtent);
-          GetMagickToken(q,&q,MagickPathExtent,token);
+          GetMagickToken(q,&q,extent,token);
           if (*token != '=')
             continue;
-          GetMagickToken(q,&q,MagickPathExtent,token);
+          GetMagickToken(q,&q,extent,token);
           if (LocaleCompare(keyword,"file") == 0)
             {
               if (depth > 200)
@@ -926,11 +930,11 @@
         coder_info=(CoderInfo *) NULL;
         continue;
       }
-    GetMagickToken(q,(const char **) NULL,MagickPathExtent,token);
+    GetMagickToken(q,(const char **) NULL,extent,token);
     if (*token != '=')
       continue;
-    GetMagickToken(q,&q,MagickPathExtent,token);
-    GetMagickToken(q,&q,MagickPathExtent,token);
+    GetMagickToken(q,&q,extent,token);
+    GetMagickToken(q,&q,extent,token);
     switch (*keyword)
     {
       case 'M':