(defwidget panel_right [] (box :class "panel_right" :halign "end" :height 28 :width 300 :active true "--panel_right--" ) )