Gnome2

 view release on metacpan or  search on metacpan

ChangeLog.pre-git  view on Meta::CPAN

	exist until libgnome 2.2.1; use version guards to avoid missing
	symbols.

2003/12/04 19:02 (+0100) kaffeetisch

	* gnome2perl.h
	* t/GnomeHelp
	* t/GnomeURL
	* xs/GnomeHelp.xs
	* xs/GnomeURL.xs: Implement and test
	Gnome2::Help::display_desktop_with_env and
	Gnome2::URL::show_with_env.

2003/12/02 20:40 (+0100) kaffeetisch

	* gnome.typemap: Use T_GPERL_GENERIC_WRAPPER for GnomeUIInfo's.

	* gnome.typemap
	* t/GnomeIconList.t
	* xs/GnomeIconList.xs: Create and register a custom GFlags type so
	we can use the cool flags magician in Gnome2::IconList::new.

t/GnomeClient  view on Meta::CPAN

  $client -> set_environment(BLA => "blub");

  $client -> flush();

 SKIP: {
    skip("this only works if we're connected to the session manager", 3)
      unless ($client -> connected());

    foreach ($client -> get_id(),
             $client -> get_previous_id(),
             $client -> get_desktop_id()) {
      # ok(defined($_));
      ok(1);
    }
  }

  $client -> signal_connect(save_yourself => sub {
    my ($client,
        $phase,
        $save_style,
        $shutting_down,

t/GnomeHelp  view on Meta::CPAN

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

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))]);
}

xs/GnomeClient.xs  view on Meta::CPAN

gnome_client_get_id (client)
	GnomeClient * client

## may return NULL
const gchar * 
gnome_client_get_previous_id (client)
	GnomeClient * client

## may return NULL
const gchar * 
gnome_client_get_desktop_id (client)
	GnomeClient * client

## void gnome_client_request_interaction (GnomeClient *client, GnomeDialogType dialog_type, GnomeInteractFunction function, gpointer data) 
## void gnome_client_request_interaction_interp (GnomeClient *client, GnomeDialogType dialog_type, GtkCallbackMarshal function, gpointer data, GtkDestroyNotify destroy) 
void
gnome_client_request_interaction (client, dialog_type, function, data=NULL)
	GnomeClient *client
	GnomeDialogType dialog_type
	SV * function
	SV * data

xs/GnomeHelp.xs  view on Meta::CPAN

# added to libgnome in 2.1.1
###  gboolean gnome_help_display_uri_with_env (const char *help_uri, char **envp, GError **error) 
#gboolean
#gnome_help_display_uri_with_env (help_uri, envp, error)
#	const char *help_uri
#	char **envp
#	GError **error

=for apidoc __gerror__
=cut
##  gboolean gnome_help_display_desktop (GnomeProgram *program, const char *doc_id, const char *file_name, const char *link_id, GError **error) 
gboolean
gnome_help_display_desktop (class, program, doc_id, file_name, link_id=NULL)
	GnomeProgram_ornull *program
	const char *doc_id
	const char *file_name
	const char *link_id
    PREINIT:
	GError *error = NULL;
    CODE:
	RETVAL = gnome_help_display_desktop (program, doc_id, file_name, link_id, &error);
	if (!RETVAL)
		gperl_croak_gerror("Gnome2::Help->display_desktop", error);
    OUTPUT:
	RETVAL

#if LIBGNOME_CHECK_VERSION (2, 2, 0)

=for apidoc __gerror__
=cut
##  gboolean gnome_help_display_desktop_with_env (GnomeProgram *program, const char *doc_id, const char *file_name, const char *link_id, char **envp, GError **error) 
gboolean
gnome_help_display_desktop_with_env (class, program, doc_id, file_name, link_id, env_ref)
	GnomeProgram *program
	const char *doc_id
	const char *file_name
	const char *link_id
	SV *env_ref
    PREINIT:
	char **envp;
	GError *error = NULL;
    CODE:
	envp = SvEnvArray (env_ref);

	RETVAL = gnome_help_display_desktop_with_env (program, doc_id, file_name, link_id, envp, &error);
	if (!RETVAL)
		gperl_croak_gerror("Gnome2::Help->display_desktop", error);

	g_free (envp);
    OUTPUT:
	RETVAL

#endif