From d375d28d158a6cbd658d2d619b87f07c21f05c01 Mon Sep 17 00:00:00 2001
From: Thomas Hooge <thomas@hoogi.de>
Date: Fri, 9 Dec 2016 10:42:31 +0100
Subject: [PATCH] Added tooltips to toolbar icons

---
 lib/GUI.pm | 32 +++++++++++++++++++++++++++++---
 1 file changed, 29 insertions(+), 3 deletions(-)

diff --git a/lib/GUI.pm b/lib/GUI.pm
index b7c86c7..75d52d6 100644
--- a/lib/GUI.pm
+++ b/lib/GUI.pm
@@ -442,6 +442,7 @@ sub create_toolbar {
       }
    } else {
       $self->{'toolbar'} = Gtk2::Toolbar->new();
+      $self->{'tooltips'} = Gtk2::Tooltips->new();
       $self->{'toolbar'}->set_orientation('horizontal');
       $self->{'toolbar'}->set_icon_size('small-toolbar');
 
@@ -452,29 +453,33 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-quit');
       $self->{'toolbar'}->insert($button, -1);
       $button->signal_connect('clicked', sub { exit(4) });
-
+      $button->set_tooltip($self->{'tooltips'}, _("Exit TinyCA"), "");
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-open');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Open CA"));
+      $button->set_tooltip($self->{'tooltips'}, _("Open other CA"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->get_open_name($self)});
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-new');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("New CA"));
+      $button->set_tooltip($self->{'tooltips'}, _("Create new CA"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->get_ca_create($self)});
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-convert');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Import CA"));
+      $button->set_tooltip($self->{'tooltips'}, _("Import CA"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->get_ca_import($self)});
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-delete');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Delete CA"));
+      $button->set_tooltip($self->{'tooltips'}, _("Delete CA"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->get_ca_delete($self)});
    
@@ -485,30 +490,35 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-find');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Details"));
+      $button->set_tooltip($self->{'tooltips'}, _("Show certificate details"), "");
       $button->signal_connect('clicked', sub {
             $self->show_details('CA') });
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-find-and-replace');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("History"));
+      $button->set_tooltip($self->{'tooltips'}, _("Show history"), "");
       $button->signal_connect('clicked', sub {
             $self->show_history() });
    
       $button = Gtk2::ToolButton->new_from_stock('gtk-new');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Sub CA"));
+      $button->set_tooltip($self->{'tooltips'}, _("Create new sub CA"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->get_ca_create($self, undef, undef, "sub")});
    
       $button = Gtk2::ToolButton->new_from_stock('gtk-save');
       $self->{'toolbar'}->insert($button, -1);
-      $button->set_label(_("Export CA"));
+      $button->set_label(_("Export CA Certificate"));
+      $button->set_tooltip($self->{'tooltips'}, _("Export CA"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->export_ca_cert($self)});
    
       $button = Gtk2::ToolButton->new_from_stock('gtk-save');
       $self->{'toolbar'}->insert($button, -1);
-      $button->set_label(_("Export CRL"));
+      $button->set_label(_("Export certificate revocation list"));
+      $button->set_tooltip($self->{'tooltips'}, _("Export CRL"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CA'}->export_crl($self)});
       
@@ -524,12 +534,14 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-find');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Details"));
+      $button->set_tooltip($self->{'tooltips'}, _("Show certificate details"), "");
       $button->signal_connect('clicked', sub {
             $self->show_details('cert') });
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-find');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("View"));
+      $button->set_tooltip($self->{'tooltips'}, _("View certificate raw data"), "");
       $button->signal_connect('clicked', sub {
             $self->show_text('cert') });
 
@@ -540,6 +552,7 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-new');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("New"));
+      $button->set_tooltip($self->{'tooltips'}, _("Create new certificate request"), "");
       $button->signal_connect('clicked' =>
             sub { $self->{'newcertmenu'}->popup( 
                undef, undef, undef, undef, 1, 0) });
@@ -547,12 +560,14 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-save');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Export"));
+      $button->set_tooltip($self->{'tooltips'}, _("Export certificate"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CERT'}->get_export_cert($self) });
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-stop');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Revoke"));
+      $button->set_tooltip($self->{'tooltips'}, _("Revoke certificate"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CERT'}->get_revoke_cert($self) });
 
@@ -563,6 +578,7 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-refresh');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Renew"));
+      $button->set_tooltip($self->{'tooltips'}, _("Renew certificate"), "");
       $button->signal_connect('clicked' =>
             sub { $self->{'renewcertmenu'}->popup(
                undef, undef, undef, undef, 1, 0) });
@@ -570,6 +586,7 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-delete');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Delete"));
+      $button->set_tooltip($self->{'tooltips'}, _("Delete certificate"), "");
       $button->signal_connect('clicked', sub {
             $self->{'CERT'}->get_del_cert($self) });
       
@@ -578,18 +595,21 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-revert-to-saved');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Import"));
+      $button->set_tooltip($self->{'tooltips'}, _("Import key"), "");
       $button->signal_connect('clicked', sub {
             $self->{'KEY'}->get_import_key($self) });
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-save');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Export"));
+      $button->set_tooltip($self->{'tooltips'}, _("Export key"), "");
       $button->signal_connect('clicked', sub {
             $self->{'KEY'}->get_export_key($self) });
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-delete');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Delete"));
+      $button->set_tooltip($self->{'tooltips'}, _("Delete key"), "");
       $button->signal_connect('clicked', sub {
             $self->{'KEY'}->get_del_key($self) });
       
@@ -598,24 +618,28 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-find');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Details"));
+      $button->set_tooltip($self->{'tooltips'}, _("Show request details"), "");
       $button->signal_connect('clicked', sub {
             $self->show_details('req') });
 
       $button = Gtk2::ToolButton->new_from_stock('gtk-find');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("View"));
+      $button->set_tooltip($self->{'tooltips'}, _("View request raw data"), "");
       $button->signal_connect('clicked', sub {
             $self->show_text('req') });
       
       $button = Gtk2::ToolButton->new_from_stock('gtk-new');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("New"));
+      $button->set_tooltip($self->{'tooltips'}, _("New request"), "");
       $button->signal_connect('clicked', sub {
             $self->{'REQ'}->get_req_create($self) });
       
       $button = Gtk2::ToolButton->new_from_stock('gtk-revert-to-saved');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Import"));
+      $button->set_tooltip($self->{'tooltips'}, _("Import request"), "");
       $button->signal_connect('clicked', sub {
             $self->{'REQ'}->get_import_req($self) });
 
@@ -626,6 +650,7 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-properties');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Sign"));
+      $button->set_tooltip($self->{'tooltips'}, _("Sign request"), "");
       $button->signal_connect('clicked' =>
             sub { $self->{'reqsignmenu'}->popup(
                undef, undef, undef, undef, 1, 0) });
@@ -633,6 +658,7 @@ sub create_toolbar {
       $button = Gtk2::ToolButton->new_from_stock('gtk-delete');
       $self->{'toolbar'}->insert($button, -1);
       $button->set_label(_("Delete"));
+      $button->set_tooltip($self->{'tooltips'}, _("Delete request"), "");
       $button->signal_connect('clicked', sub {
             $self->{'REQ'}->get_del_req($self) });
    }