+ /* Add some font defaults. If the font `helv' doesn't exist, widgets
+ will use some other default font. */
+#ifdef USE_MOTIF
+
+ sprintf (line, "%s.pane.background: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fontList: %s", myclass, helv);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*menu*background: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*menubar*background: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*verticalScrollBar.background: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*verticalScrollBar.troughColor: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s.dialog*.background: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb.Text.background: white", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb.FilterText.background: white", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb*DirList.background: white", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb*ItemsList.background: white", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb*background: grey75", myclass);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb.Text.fontList: %s", myclass, courier);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb.FilterText.fontList: %s", myclass, courier);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb*ItemsList.fontList: %s", myclass, courier);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb*DirList.fontList: %s", myclass, courier);
+ XrmPutLineResource (&rdb, line);
+
+ /* Set double click time of list boxes in the file selection
+ dialog from `double-click-time'. */
+ if (INTEGERP (Vdouble_click_time) && XINT (Vdouble_click_time) > 0)
+ {
+ sprintf (line, "%s*fsb*DirList.doubleClickInterval: %d",
+ myclass, XFASTINT (Vdouble_click_time));
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "%s*fsb*ItemsList.doubleClickInterval: %d",
+ myclass, XFASTINT (Vdouble_click_time));
+ XrmPutLineResource (&rdb, line);
+ }
+
+#else /* not USE_MOTIF */
+
+ sprintf (line, "Emacs.dialog*.font: %s", helv);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "Emacs.dialog*.background: grey75");
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "*XlwMenu*font: %s", helv);
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "*XlwMenu*background: grey75");
+ XrmPutLineResource (&rdb, line);
+ sprintf (line, "Emacs*verticalScrollBar.background: grey75");
+ XrmPutLineResource (&rdb, line);
+
+#endif /* not USE_MOTIF */
+
+ user_database = get_user_db (display);
+
+ /* Figure out what the "customization string" is, so we can use it
+ to decode paths. */
+ if (x_customization_string)
+ free (x_customization_string);
+ x_customization_string
+ = x_get_customization_string (user_database, myname, myclass);
+