Mercurial > emacs
diff src/font.c @ 109735:0fe981e141e3
Remove incorrect const use.
* src/font.h (font_parse_xlfd, font_parse_fcname, font_unparse_fcname)
(font_parse_name): font_open_by_name):
* src/font.c (font_parse_xlfd, font_parse_fcname, font_unparse_fcname)
(font_parse_name): font_open_by_name): Remove const.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Mon, 09 Aug 2010 15:03:38 -0700 |
parents | 64732fa6188a |
children | e2f8226efb99 |
line wrap: on
line diff
--- a/src/font.c Mon Aug 09 13:01:51 2010 -0700 +++ b/src/font.c Mon Aug 09 15:03:38 2010 -0700 @@ -701,7 +701,7 @@ static int parse_matrix (const char *); static int font_expand_wildcards (Lisp_Object *, int); -static int font_parse_name (const char *, Lisp_Object); +static int font_parse_name (char *, Lisp_Object); /* An enumerator for each field of an XLFD font name. */ enum xlfd_field_index @@ -981,7 +981,7 @@ a fully specified XLFD. */ int -font_parse_xlfd (const char *name, Lisp_Object font) +font_parse_xlfd (char *name, Lisp_Object font) { int len = strlen (name); int i, j, n; @@ -1306,7 +1306,7 @@ This function tries to guess which format it is. */ int -font_parse_fcname (const char *name, Lisp_Object font) +font_parse_fcname (char *name, Lisp_Object font) { char *p, *q; char *size_beg = NULL, *size_end = NULL; @@ -1563,7 +1563,7 @@ FONT_SIZE_INDEX of FONT is 0, use PIXEL_SIZE instead. */ int -font_unparse_fcname (Lisp_Object font, int pixel_size, const char *name, int nbytes) +font_unparse_fcname (Lisp_Object font, int pixel_size, char *name, int nbytes) { Lisp_Object family, foundry; Lisp_Object tail, val; @@ -1765,7 +1765,7 @@ 0. Otherwise return -1. */ static int -font_parse_name (const char *name, Lisp_Object font) +font_parse_name (char *name, Lisp_Object font) { if (name[0] == '-' || strchr (name, '*') || strchr (name, '?')) return font_parse_xlfd (name, font); @@ -3506,7 +3506,7 @@ found, return Qnil. */ Lisp_Object -font_open_by_name (FRAME_PTR f, const char *name) +font_open_by_name (FRAME_PTR f, char *name) { Lisp_Object args[2]; Lisp_Object spec, ret;