Re: [gtk-list] Re: Tutorial code converted to Perl

[Kenneth Albanowski <kjahds kjahds com>]

On 16 Apr 1998, Jason L Tibbitts III wrote:

> I'm trying to find Perl equivalents of:
> 
> style = gtk_widget_get_default_style();
> and 
> gtk_widget_shape_combine_mask( window, mask, 0, 0 );
> 
> The first wants to be a widget method, so I made it work by calling it as
> one:
> 
> $style = $window->get_default_style;

Which is rather silly, that'll be fixed so it is:

  $style = Gtk::Widget->get_default_style; 

> but the latter one has me stumped.  I've tried numerous things hinted by
> the XS code but the best I can do is to get an X error [1] instead of a Perl
> error [2].

Should be as simple as:

   $window->shape_combine_mask($mask, 0, 0);

For those errors to occur, either the window or mask is probably broken.
Which probably means some earlier lines have croaked.

-- 
Kenneth Albanowski (kjahds@kjahds.com, CIS: 70705,126)