From 11ff76153e012cf76690568cf82b9a049c40e949 Mon Sep 17 00:00:00 2001 From: Po Lu Date: Wed, 9 Feb 2022 05:09:24 +0000 Subject: [PATCH] Make haikufont_list_family actually work * haikufont.c (haikufont_list_family): Intern returned font families. --- src/haikufont.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/haikufont.c b/src/haikufont.c index ebff619287d..e9e788e8e86 100644 --- a/src/haikufont.c +++ b/src/haikufont.c @@ -1043,8 +1043,7 @@ haikufont_list_family (struct frame *f) for (idx = 0; idx < length; ++idx) { if (styles[idx][0]) - list = Fcons (build_string_from_utf8 ((char *) &styles[idx]), - list); + list = Fcons (intern ((char *) &styles[idx]), list); } free (styles); -- 2.39.5