Next: Gnome2::Vte::index | Previous: Gnome2::VFS::Xfer | [Gtk2-Perl - Table of Contents] | [Gtk2-Perl - Index] |
Gnome2::Vte - Perl interface to the Virtual Terminal Emulation library
use strict; use Glib qw(TRUE FALSE); use Gtk2 -init; use Gnome2::Vte; # create things my $window = Gtk2::Window->new; my $scrollbar = Gtk2::VScrollbar->new; my $hbox = Gtk2::HBox->new; my $terminal = Gnome2::Vte::Terminal->new; # set up scrolling $scrollbar->set_adjustment ($terminal->get_adjustment); # lay 'em out $window->add ($hbox); $hbox->pack_start ($terminal, TRUE, TRUE, 0); $hbox->pack_start ($scrollbar, FALSE, FALSE, 0); $window->show_all; # hook 'em up $terminal->fork_command ('/bin/bash', ['bash', '-login'], undef, '/tmp', FALSE, FALSE, FALSE); $terminal->signal_connect (child_exited => sub { Gtk2->main_quit }); $window->signal_connect (delete_event => sub { Gtk2->main_quit; FALSE }); # turn 'em loose Gtk2->main;
This module allows a Perl developer to use the Virtual Terminal Emulator library (libvte for short).
Gnome2::Vte::index(3pm), Gtk2(3pm), Gtk2::api(3pm) and http://developer.gnome.org/doc/API/2.0/vte/.
Torsten Schoenfeld <kaffeetisch at gmx dot de>
Copyright (C) 2003-2006 by the gtk2-perl team