summaryrefslogtreecommitdiff
path: root/src/xfont.c
diff options
context:
space:
mode:
authorDmitry Antipov <dmantipov@yandex.ru>2014-09-23 19:49:00 +0400
committerDmitry Antipov <dmantipov@yandex.ru>2014-09-23 19:49:00 +0400
commit59e10fbd934323702a4586f50139d58db846bbf1 (patch)
tree194db3962ed3b518afc92eed10ed16c29f6e0b15 /src/xfont.c
parentc03d2c89fbf878575cc46011df44f04103d8e19b (diff)
downloademacs-59e10fbd934323702a4586f50139d58db846bbf1.tar.gz
Use known length of a Lisp string to copy it faster.
* lisp.h (lispstrcpy): New function. Add comment. * callproc.c (child_setup): * dbusbind.c (xd_append_arg): * doc.c (get_doc_string): * font.c (Ffont_xlfd_name): * frame.c (xrdb_get_resource): * process.c (Fmake_network_process, network_interface_info): * w32fns.c (Fx_open_connection): * w32proc.c (sys_spawnve): * xfns.c (select_visual): * xfont.c (xfont_list): * xsmfns.c (x_session_initialize): * xterm.c (x_term_init): Use it.
Diffstat (limited to 'src/xfont.c')
-rw-r--r--src/xfont.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/xfont.c b/src/xfont.c
index 90b69ad5187..db0449716ab 100644
--- a/src/xfont.c
+++ b/src/xfont.c
@@ -541,7 +541,7 @@ xfont_list (struct frame *f, Lisp_Object spec)
if (STRINGP (XCAR (alter))
&& ((r - name) + SBYTES (XCAR (alter))) < 256)
{
- strcpy (r, SSDATA (XCAR (alter)));
+ lispstrcpy (r, XCAR (alter));
list = xfont_list_pattern (display, name, registry, script);
if (! NILP (list))
break;