On Mon, Apr 25, 2005 at 07:26:19 +0300, Dov Grobgeld wrote:
> The following almost works for me under fvwm2:
>
> if (!$do_windowed) {
> $mw->realize;
> my(@geom) = $mw->window->get_geometry();
> $mw->window->set_override_redirect(1);
> $mw->window->move($win_pos_x-$geom[0], $win_pos_y-$geom[1]);
> }
>
> Unfortunately it still pops up at (0,0) on the screen. I.e. the move
> command doesn't work.
Sure, unlike ->set_decorated, which just ataches a property "please,
don't decorate this window", and the window manager does not have to
honour it. But ->set_override_redirect is another matter. It tells the
X server not to honour configure redirect on the parent (root) window,
so window-manager does not know about the window. So it has to work.
However, it does not honour desktops and it does not honour stacking
order from the window manager. Also the window might end up invissible
in some window managers, that do desktops with windows instead of
mapping and unmapping (IIRC Enlightment does this).
> Regards,
> Dov
>
> On Sun, Apr 24, 2005 at 03:58:46PM -0400, zentara wrote:
> > Hi,
> > Has anyone figured out how to remove decorations
> > on fvwm2? Is fvwm2 just not cooperating?
> > This script dosn't work for me.
> >
> > #!/usr/bin/perl
> > use warnings;
> > use strict;
> > use Glib qw/TRUE FALSE/;
> > use Gtk2 '-init';
> >
> > # dosn't seem to work on fvwm2
> >
> > my $window = Gtk2::Window->new();
> > $window->set_decorated(0);
> > Gtk2::Window::set_decorated($window, 0);
> > print $window->get_decorated(),"\n";
> >
> > $window ->signal_connect( 'destroy' => \&delete_event );
> > $window ->signal_connect( 'delete-event' => \&delete_event );
> > $window->set_border_width(10);
> > $window->set_size_request(300,200);
> >
> > my $vbox = Gtk2::VBox->new( FALSE, 6 );
> > $window->add($vbox);
> > $vbox->set_border_width(2);
> >
> > my $hbox= Gtk2::HBox->new( FALSE, 6 );
> > $vbox->pack_end($hbox,FALSE,FALSE,0);
> > $hbox->set_border_width(2);
> >
> > my $button = Gtk2::Button->new_from_stock('gtk-quit');
> > $hbox->pack_end( $button, FALSE, FALSE, 0 );
> > $button->signal_connect( clicked => \&delete_event );
> >
> > $window->set_position('center');
> > $window->show_all();
> > Gtk2->main;
> > return 0;
> > #####################################
> > sub delete_event {
> > Gtk2->main_quit;
> > return FALSE;
> > }
> > __END__
> >
> >
> >
> > --
> > I'm not really a human, but I play one on earth.
> > http://zentara.net/japh.html
> > _______________________________________________
> > gtk-perl-list mailing list
> > gtk-perl-list gnome org
> > http://mail.gnome.org/mailman/listinfo/gtk-perl-list
> _______________________________________________
> gtk-perl-list mailing list
> gtk-perl-list gnome org
> http://mail.gnome.org/mailman/listinfo/gtk-perl-list
>
-------------------------------------------------------------------------------
Jan 'Bulb' Hudec <bulb ucw cz>
Attachment:
signature.asc
Description: Digital signature