home *** CD-ROM | disk | FTP | other *** search
/ Practical Programming in Tcl & Tk (4th Edition) / TCLBOOK4.BIN / pc / exsource / 31_3.tcl < prev    next >
Text File  |  2003-04-16  |  371b  |  18 lines
  1. #
  2. # Example 31-3
  3. # Using resources to specify user-defined buttons.
  4. #
  5.  
  6. *User.buttonlist: save search justify quit
  7. *User.save.text: Save
  8. *User.save.command: File_Save
  9. *User.search.text: Search
  10. *User.search.command: Edit_Search
  11. *User.justify.text: Justify
  12. *User.justify.command: Edit_Justify
  13. *user.quit.text: Quit
  14. *User.quit.command: File_Quit
  15. *User.quit.background: red
  16.  
  17.  
  18.