view release on metacpan or  search on metacpan

t/GnomeHelp  view on Meta::CPAN

#!/usr/bin/perl -w
use strict;
use Gnome2;

# $Id$

###############################################################################

SKIP: {
  our $application;
  do "t/TestBoilerplate";

  #############################################################################

  Gnome2::Help -> display("zenity.xml");
  Gnome2::Help -> display_desktop($application, "panel", "launchers.html");
  Gnome2::Help -> display_desktop_with_env($application, "panel", "launchers.html", "", [map { "$_=" . $ENV{ $_ } } (keys(%ENV))]);
}