2
! Examples of customizing xmh with resource specifications.
3
! These can be copied to your private X resource file or to
4
! a private Xmh application defaults file.
8
! To create command buttons in the middle of the main window:
10
Xmh*CommandButtonCount: 8
12
Xmh*commandBox.button1.label: inc
13
Xmh*commandBox.button1.translations: #override\
14
<Btn1Down>,<Btn1Up>: XmhIncorporateNewMail() unset()
16
Xmh*commandBox.button2.label: compose
17
Xmh*commandBox.button2.translations: #override\
18
<Btn1Down>,<Btn1Up>: XmhComposeMessage() unset()
20
Xmh*commandBox.button3.label: next
21
Xmh*commandBox.button3.translations: #override\
22
<Btn1Down>,<Btn1Up>: XmhViewNextMessage() unset()
24
Xmh*commandBox.button4.label: prev
25
Xmh*commandBox.button4.translations: #override\
26
<Btn1Down>,<Btn1Up>: XmhViewPreviousMessage() unset()
28
Xmh*commandBox.button5.label: commit
29
Xmh*commandBox.button5.translations: #override\
30
<Btn1Down>,<Btn1Up>: XmhCommitChanges() unset()
32
Xmh*commandBox.button6.label: delete
33
Xmh*commandBox.button6.translations: #override\
34
<Btn1Down>,<Btn1Up>: XmhMarkDelete() unset()
36
Xmh*commandBox.button7.label: move
37
Xmh*commandBox.button7.translations: #override\
38
<Btn1Down>,<Btn1Up>: XmhMarkMove() unset()
40
Xmh*commandBox.button8.label: reply to viewed msg
41
Xmh*commandBox.button8.translations: #override\
42
<Btn1Down>,<Btn1Up>: XmhViewReply() unset()
45
! To use popup menus on the title bars of the main window,
46
! have them popup with the pointer over the previously selected item,
47
! and not be clipped by the screen boundary:
50
Xmh*messageMenu.MenuOnScreen: True
52
Xmh*folderTitlebar.translations: #override\n\
53
<BtnDown>: XawPositionSimpleMenu(folderMenu)MenuPopup(folderMenu)\n
55
Xmh*tocTitlebar.translations: #override\n\
56
<Btn2Down>: XawPositionSimpleMenu(messageMenu)MenuPopup(messageMenu)\n\
57
<BtnDown>: XawPositionSimpleMenu(tocMenu)MenuPopup(tocMenu)\n
59
Xmh.Paned.viewTitlebar.translations: #override\n\
60
<Btn2Down>: XawPositionSimpleMenu(sequenceMenu)MenuPopup(sequenceMenu)\n\
61
<BtnDown>: XawPositionSimpleMenu(viewMenu)MenuPopup(viewMenu)\n
64
! To redefine the accelerator bindings to exclude modifier keys,
65
! and add a translation for Compose Message:
67
Xmh*tocMenu.accelerators: #override\n\
68
!:<Key>I: XmhIncorporateNewMail()\n\
69
!:<Key>C: XmhCommitChanges()\n\
70
!:<Key>R: XmhForceRescan()\n\
71
!:<Key>P: XmhPackFolder()\n\
72
!:<Key>S: XmhSortFolder()\n
73
Xmh*messageMenu.accelerators: #override\n\
74
!:<Key>M: XmhComposeMessage()\n\
75
!<Key>space: XmhViewNextMessage()\n\
76
!:<Key>c: XmhMarkCopy()\n\
77
!:<Key>d: XmhMarkDelete()\n\
78
!:<Key>f: XmhForward()\n\
79
!:<Key>m: XmhMarkMove()\n\
80
!:<Key>n: XmhViewNextMessage()\n\
81
!:<Key>p: XmhViewPreviousMessage()\n\
82
!:<Key>r: XmhReply()\n\
83
!:<Key>u: XmhUnmark()\n
86
! Here is an example of some miscellaneous accelerators:
87
! ("clients/xmh" is a subfolder; it must be existing.)
89
Xmh*toc.accelerators: #override\n\
90
<Key>F1: XmhOpenFolder(inbox)XmhOpenSequence(all)\n\
91
<Key>F2: XmhOpenFolder(drafts)\n\
92
<Key>F3: XmhOpenFolder(clients/xmh)\n\
93
<Key>F4: XmhViewInNewWindow()\n\
94
<Key>F5: XmhPickMessages()\n
97
! Define Meta-S in the Compose window to do a send and close.
99
Xmh*comp.translations: #override\n\
100
!:Meta<Key>S: XmhSend()XmhCloseView()