let hbox = GPack.hbox ~spacing:10 () in
hbox#pack ~from:`START ~expand:true ~fill:true (image:>GObj.widget);
hbox#pack ~from:`START ~expand:true ~fill:true (label:>GObj.widget);
m#vbox#pack ~from:`START
~padding:20 ~expand:true ~fill:true (hbox:>GObj.widget);
let hbox = GPack.hbox ~spacing:10 () in
hbox#pack ~from:`START ~expand:true ~fill:true (image:>GObj.widget);
hbox#pack ~from:`START ~expand:true ~fill:true (label:>GObj.widget);
m#vbox#pack ~from:`START
~padding:20 ~expand:true ~fill:true (hbox:>GObj.widget);