frozen_string_literal: false
text widget peering demo (called by 'widget')
based on Tcl/Tk8.5.0 widget demos