Mercurial > emacs
comparison src/xrdb.c @ 29865:6b6699c7fce3
(x_load_resources): Add default resource for scroll bar's
trough color and main window's background color.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Thu, 22 Jun 2000 22:05:37 +0000 |
parents | 3dec4cd5e361 |
children | 43566b0aec59 |
comparison
equal
deleted
inserted
replaced
29864:507584616639 | 29865:6b6699c7fce3 |
---|---|
540 | 540 |
541 /* Add some font defaults. If the font `helv' doesn't exist, widgets | 541 /* Add some font defaults. If the font `helv' doesn't exist, widgets |
542 will use some other default font. */ | 542 will use some other default font. */ |
543 #ifdef USE_MOTIF | 543 #ifdef USE_MOTIF |
544 | 544 |
545 sprintf (line, "%s.pane.background: grey75", myname); | |
546 XrmPutLineResource (&rdb, line); | |
545 sprintf (line, "%s*fontList: %s", myname, helv); | 547 sprintf (line, "%s*fontList: %s", myname, helv); |
546 XrmPutLineResource (&rdb, line); | 548 XrmPutLineResource (&rdb, line); |
547 sprintf (line, "%s*menu*background: grey75", myname); | 549 sprintf (line, "%s*menu*background: grey75", myname); |
548 XrmPutLineResource (&rdb, line); | 550 XrmPutLineResource (&rdb, line); |
549 sprintf (line, "%s*menubar*background: grey75", myname, helv); | 551 sprintf (line, "%s*menubar*background: grey75", myname, helv); |
550 XrmPutLineResource (&rdb, line); | 552 XrmPutLineResource (&rdb, line); |
551 sprintf (line, "%s*verticalScrollBar.background: grey75", myname); | 553 sprintf (line, "%s*verticalScrollBar.background: grey75", myname); |
554 XrmPutLineResource (&rdb, line); | |
555 sprintf (line, "%s*verticalScrollBar.troughColor: grey75", myname); | |
552 XrmPutLineResource (&rdb, line); | 556 XrmPutLineResource (&rdb, line); |
553 sprintf (line, "%s.dialog*.background: grey75", myname); | 557 sprintf (line, "%s.dialog*.background: grey75", myname); |
554 XrmPutLineResource (&rdb, line); | 558 XrmPutLineResource (&rdb, line); |
555 sprintf (line, "%s*fsb.Text.background: white", myname); | 559 sprintf (line, "%s*fsb.Text.background: white", myname); |
556 XrmPutLineResource (&rdb, line); | 560 XrmPutLineResource (&rdb, line); |