Test::Without::Gtk2Things - disable selected Gtk2 methods for testing
# perl -MTest::Without::Gtk2Things=insert_with_values foo.t # or use Test::Without::Gtk2Things 'insert_with_values';
This module removes or disables selected features from
Gtk2 in order to simulate an older version or other restrictions. It can be used for development or testing to check code which adapts itself to available features or which is meant to run on older Gtk. There's only a couple of "without" things as yet.
Obviously the best way to test application code on older Gtk is to run it on an older Gtk, but making a full environment for that can be difficult.
From the command line use a
-M module load (as per perlrun) for a program or test script,
perl -MTest::Without::Gtk2Things=insert_with_values foo.t
Or the same through
Test::Harness in a
HARNESS_PERL_SWITCHES="-MTest::Without::Gtk2Things=blank_cursor" \ make test
A test script can do the same with a
use Test::Without::Gtk2Things 'insert_with_values';
Or an equivalent explicit import,
require Test::Without::Gtk2Things; Test::Without::Gtk2Things->import('insert_with_values');
In each case generally the "withouts" should be established before loading application code in case that code checks features at
Gtk2 if not already loaded, but don't rely on that. Mangling if/when loaded might be good instead, if it could be done reliably.
Test::Without::Gtk2Thingsprint some diagnostic messages to
STDERR. For example,
perl -MTest::Without::Gtk2Things=verbose,blank_cursor foo.t # prints Test::Without::Gtk2Things -- without CursorType blank-cursor, per Gtk before 2.16 ...
Gtk2::Gdk::CursorTypeenumeration per Gtk before 2.16.
This means removing it from
Glib::Type->list_values('Gtk2::Gdk::CursorType'), and making
new_for_display()throw an error if asked for that type.
Object properties of type
Gtk2::Gdk::CursorTypeare not affected, so they can still be set to
blank-cursor, but perhaps that could be caught in the future. Blank cursors within Gtk itself are unaffected.
blank-cursoris new in Gtk 2.16. In earlier versions an invisible cursor can be made by applications with a no-pixels-set bitmap as described by
gdk_cursor_new()in such earlier versions. (See Gtk2::Ex::WidgetCursor for some help doing that.)
Gtk2::Buildableinterface, as per Gtk before 2.12.
The Buildable interface is removed by removing the class and by mangling
UNIVERSAL::isa()to pretend nothing is a Buildable. Actual package
@ISAlists are not changed currently. This should mean Buildable still works in C code, but not from Perl (neither currently loaded classes nor later loaded classes).
In a Perl widget implementation it's fairly easy to support Gtk pre-2.12 by omitting the Buildable interface if not available.
use Glib::Object::Subclass 'Gtk2::DrawingArea', interfaces => [ # Buildable new in Gtk 2.12, omit otherwise Gtk2::Widget->isa('Gtk2::Buildable') ? ('Gtk2::Buildable') : (), ];
get_cells()method from the
Gtk2::CellLayoutinterface, per Gtk before 2.12.
This method removal affects all widget classes which implement the CellLayout interface. In earlier Gtk versions
get_cell_renderers()methods. Those methods are unaffected by this without.
draw-as-radioproperty and corresponding explicit get/set methods.
draw-as-radioon those two classes is new in Gtk 2.4. For prior versions it was only a builtin drawing feature of
Gtk2::RadioMenuItem, or some such. Simply skipping it may be good enough in those prior versions.
Gtk2::Gdk::Screenclasses, and the various
set_screen(), etc widget methods, as would be the case in Gtk 2.0.x.
In Gtk 2.0.x there is a single implicit screen and display, and some methods for querying their attributes (see Gtk2::Gdk). Most widget code doesn't need to do much with a screen or display object, and it can be reasonably easy to support 2.0.x by checking for a
set_screen()method etc if say putting a dialog on the same screen as its originating main window.
Gtk2::TreeStore. That method is new in Gtk 2.6. In earlier versions separate
set()calls are necessary.
use-underlineproperties and corresponding explicit
use-underlineare new in Gtk 2.16. (For prior versions
new_with_mnemonic()create and set a child label widget.)
Gtk2::Widgetbase tooltip support new in Gtk 2.12. This means the
has-tooltipproperties, their direct get/set methods such as
$widget->set_tooltip_text(), and the
For code supporting both earlier and later than 2.12 it may be enough to just skip the tooltip setups for the earlier versions. See
set_property_maybe()in Glib::Ex::ObjectBits for some help with that.
It's not possible to restore removed things, once removed they're gone for the whole program run.
set_property_maybe() for skipping non-existent properties.
Copyright 2010, 2011, 2012 Kevin Ryde
Gtk2-Ex-WidgetBits is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version.
Gtk2-Ex-WidgetBits is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with Gtk2-Ex-WidgetBits. If not, see http://www.gnu.org/licenses/.