;; A basic scale widget

(pack (scale '.s1))