Mercurial > emacs

changeset 90730:7465505e3de1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(x_load_resources): Setup the default fontSet X reource.
author Kenichi Handa <handa@m17n.org>
date Wed, 20 Dec 2006 07:07:13 +0000
parents 6588c6259dfb
children a6c97c25a666
files src/xrdb.c
diffstat 1 files changed, 23 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/xrdb.c	Sat Dec 16 01:29:26 2006 +0000
+++ b/src/xrdb.c	Wed Dec 20 07:07:13 2006 +0000
@@ -610,6 +610,29 @@
 
 #endif /* not USE_MOTIF */
 
+#ifdef HAVE_X_I18N
+  {
+#ifdef USE_MOTIF
+    Bool motif = True;
+#else  /* not USE_MOTIF */
+    Bool motif = False;
+#endif  /* not USE_MOTIF */
+    /* Setup the default fontSet resource.  */
+    extern char *xic_create_fontsetname P_ ((char *base_fontname, Bool motif));
+    char *fontsetname = xic_create_fontsetname (helv, motif);
+    int len = strlen (fontsetname);
+    char *buf = line;
+
+    /* fontsetname may be very long.  */
+    if (len + 16 > 256)
+      buf = alloca (len + 16);
+    sprintf (buf, "Emacs*fontSet: %s", fontsetname);
+    XrmPutLineResource (&rdb, buf);
+    if (fontsetname != helv)
+      xfree (fontsetname);
+  }
+#endif	/* HAVE_X_I18N */
+
   user_database = get_user_db (display);
 
   /* Figure out what the "customization string" is, so we can use it