diff options
| -rw-r--r-- | perl-install/ugtk2.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 152d4eaa6..2d0ec3789 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -106,6 +106,13 @@ sub gtkappenditems { $w } +# append page to a notebook +sub gtkappend_page { + my $w = shift; + $w->append_page(@_); + $w +} + sub gtkbuttonset { gtkdestroy($_[0]->child); gtkadd($_[0], gtkshow($_[1])) |