with String_List;
use  String_List;
package Fallback is

   XmMore_Fallback : String_List.Element_Access_List :=
            String_List.Null_Element_Access_List &
"*text.foreground: black" &
"*text.background: grey90" &
"*file_menu.labelString:  File" &
"*file_menu.mnemonic:  F" &
"*file_exit.labelString:  Exit" &
"*file_exit.mnemonic:  x" &
"*file_exit.accelerator:  Ctrl<Key>Q" &
"*file_exit.acceleratorText:  Ctrl+Q" &
"*help_menu.labelString:  Help" &
"*help_menu.mnemonic:  H" &
"*help_about.labelString: About..." &
"*help_about.mnemonic:  A" &
"*about_dialog.dialogTitle: About XmMore" &
"*text.fontList: -adobe-courier-medium-r-normal--12-*-*-*-*-*-*-*"
;

end Fallback;