TkMsgCatalog.new('::tkmsgcat_demo') {
    en "Application Error"
    en "Blue"
    en "Color"
    en "Delete"
    en "Error"
    en "Green"
    en "Red"
    en "blue"
    en "green"
    en "red"
}

TkMsgCatalog.new('::tk') {
    en "&Abort"
    en "About..."
    en "All Files"
    en "Application Error"
    en "&Blue"
    en "&Cancel"
    en "Cannot change to the directory \"%1\$s\".\nPermission denied."
    en "Choose Directory"
    en "Clear"
    en "Color"
    en "Console"
    en "Copy"
    en "Cut"
    en "Delete"
    en "Details >>"
    en "Directory \"%1\$s\" does not exist."
    en "&Directory:"
    en "Error: %1\$s"
    en "Exit"
    en "File \"%1\$s\" already exists.\nDo you want to overwrite it?"
    en "File \"%1\$s\" already exists.\n\n"
    en "File \"%1\$s\" does not exist."
    en "File &name:"
    en "File &names:"
    en "Files of &type:"
    en "Fi&les:"
    en "&Filter"
    en "Fil&ter:"
    en "&Green"
    en "Hi"
    en "Hide Console"
    en "&Ignore"
    en "Invalid file name \"%1\$s\"."
    en "Log Files"
    en "&No"
    en "&OK"
    en "Ok"
    en "Open"
    en "&Open"
    en "Open Multiple Files"
    en "Paste"
    en "Quit"
    en "&Red"
    en "Replace existing file?"
    en "&Retry"
    en "&Save"
    en "Save As"
    en "Save To Log"
    en "Select Log File"
    en "Select a file to source"
    en "&Selection:"
    en "Skip Messages"
    en "Source..."
    en "Tcl Scripts"
    en "Tcl for Windows"
    en "Text Files"
    en "&Yes"
    en "abort"
    en "blue"
    en "cancel"
    en "extension"
    en "extensions"
    en "green"
    en "ignore"
    en "ok"
    en "red"
    en "retry"
    en "yes"
}