]> www.dxcluster.org Git - spider.git/blob - cmd/unset/gtk.pl
add some flesh to a gtk based console program
[spider.git] / cmd / unset / gtk.pl
1 #
2 # unset the gtk flag
3 #
4 # Copyright (c) 2006 - Dirk Koopman
5 #
6 # $Id$
7 #
8
9 my ($self, $line) = @_;
10 my @out;
11 $self->gtk(0);
12 $self->enhanced(0);
13 push @out, $self->msg('gtku', $self->call);
14 return (1, @out);