+ /* 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 */
+