[MGS] Sometimes I like to have labels that automatically wrap to the width of the window, sort of like a text widget, but without the scrolling (i.e. the whole label text is always visible). It's pretty easy to do (for basic text-only labels):

  label .l -text "A label with a long text string to test auto-wrapping"
  pack  .l -expand 1
  bind  .l <Configure> [list %W configure -wraplength %w]

For labels with compound images, it's a little bit trickier. You nhave to subtract the image width and -padx values from the label width, to get the text wraplength