Update pot file for release again

[clawsker.git] / clawsker

diff --git a/clawsker b/clawsker
index 49381b3713f2d31857b9e173e8fafd1282509eb5..01860a6f4e380043c8b478afbb0b576160772fd2 100755 (executable)
--- a/clawsker
+++ b/clawsker
@@ -215,7 +215,7 @@ sub _ {
     h_acc_gtls_pri => _('Value to use as GnuTLS priority string if custom priority check is enabled. Otherwise this value is ignored.'),
 
     l_plu_gpg_alimit => _('Autocompletion limit'),
-    h_plu_gpg_alimit => _('Limits the number of addresses obtained from from keyring through autocompletion. Use 0 to get all matches.'),
+    h_plu_gpg_alimit => _('Limits the number of addresses obtained from keyring through autocompletion. Use 0 to get all matches.'),
     l_plu_lav_burl => _('Base URL'),
     h_plu_lav_burl => _('This is the URL where avatar requests are sent. You can use the one of your own libravatar server, if available.'),
     l_plu_prl_flvb => _('Log level'),
@@ -2167,7 +2167,7 @@ sub load_resource {
     my %meta = ();
     my $line = 0;
     open (RCF, '<:encoding(utf8)', $rc)
-        or die _("Error: opening '{file}' for reading", file => $rc) . ": $!";
+        or die _("Error: opening '{file}' for reading", file => $rc) . ": $!\n";
     my $section = '_'; # default unnamed section
     while (<RCF>) {
         chomp;
@@ -2195,7 +2195,7 @@ sub load_resource {
 sub save_resource {
     my ($rc, $data, $meta) = @_;
     open (RCF, '>:utf8', $rc)
-        or die _("Error: opening '{file}' for writing", file => $rc) . ": $!";
+        or die _("Error: opening '{file}' for writing", file => $rc) . ": $!\n";
     my @sections = keys %$data;
     if (defined $meta) {
         @sections = sort {
@@ -2355,6 +2355,13 @@ along with this program.  If not, see &lt;http://www.gnu.org/licenses/&gt;.";
                     . "<span size=\"large\">$lic</span>\n\n"
                     . "<span size=\"small\">$license</span>");
     $dialog->set_title ($xl::s{about});
+    if (Gtk2->CHECK_VERSION (2, 10, 0)) {
+        my @icons = get_app_icons ();
+        my $image = Gtk2::Image->new_from_pixbuf ($icons[1]);
+        $image->show ();
+        $image->set_alignment (0, 0);
+        $dialog->set_image ($image);
+    }
     #
     return $dialog;
 }