summaryrefslogtreecommitdiff
path: root/src/xfaces.c
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2015-04-15 12:15:14 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2015-04-15 12:15:14 -0400
commit66ae3cff960606f96818e085226e05457d98a3cf (patch)
treed8f4712f0547f630c19636e50b8a34328af36353 /src/xfaces.c
parentcc4705f693471650a10ec51c8eb54c7ffe873045 (diff)
downloademacs-66ae3cff960606f96818e085226e05457d98a3cf.tar.gz
* src/lread.c (intern_1): Make sure we'd find the symbol we add
Fixes: debbugs:20334 * src/xfaces.c (resolve_face_name): Don't use `intern' with Lisp_Strings.
Diffstat (limited to 'src/xfaces.c')
-rw-r--r--src/xfaces.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/xfaces.c b/src/xfaces.c
index b2697220bce..d198c4be1a9 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -1822,7 +1822,7 @@ resolve_face_name (Lisp_Object face_name, bool signal_p)
Lisp_Object tortoise, hare;
if (STRINGP (face_name))
- face_name = intern (SSDATA (face_name));
+ face_name = Fintern (face_name, Qnil);
if (NILP (face_name) || !SYMBOLP (face_name))
return face_name;