diff --git a/lib/Gtk3.pm b/lib/Gtk3.pm index a817d8e..4bfb2ad 100644 --- a/lib/Gtk3.pm +++ b/lib/Gtk3.pm @@ -780,6 +780,13 @@ sub Gtk3::HBox::new { $_GTK_BASENAME, 'HBox', 'new', $class, $homogeneous, $spacing); } +sub Gtk3::Frame::new { + my ($class, $label) = @_; + $label = '' unless defined $label; + return Glib::Object::Introspection->invoke ( + $_GTK_BASENAME, 'Frame', 'new', $class, $label); +} + sub Gtk3::ImageMenuItem::new { my ($class, $mnemonic) = @_; if (defined $mnemonic) { @@ -819,6 +826,13 @@ sub Gtk3::LinkButton::new { } } +sub Gtk3::Label::new { + my ($class, $label) = @_; + $label = '' unless defined $label; + return Glib::Object::Introspection->invoke ( + $_GTK_BASENAME, 'Label', 'new', $class, $label); +} + sub Gtk3::ListStore::new { return _common_tree_model_new ('ListStore', @_); }