]> code.delx.au - gnu-emacs/blobdiff - src/ftfont.c
Merge from emacs-24; up to 117687
[gnu-emacs] / src / ftfont.c
index 0ab3119365e175e120526214e8f07113c6d577e9..4c12ef5d3afe0e467e39e552e33b7df269737cc2 100644 (file)
@@ -804,7 +804,7 @@ ftfont_spec_pattern (Lisp_Object spec, char *otlayout, struct OpenTypeSpec **ots
              *otspec = ftfont_get_open_type_spec (val);
              if (! *otspec)
                return NULL;
-             strcat (otlayout, "otlayout:");
+             strcpy (otlayout, "otlayout:");
              OTF_TAG_STR ((*otspec)->script_tag, otlayout + 9);
              script = (*otspec)->script;
            }