[Commits] [SCM] clawsker branch, master, updated. 1.2.0-42-g382ba3f

[mones at claws-mail.org]

The branch, master has been updated
       via  382ba3f3c84eb3317d2e647ea8ebf06ffa6371f5 (commit)
      from  690514baf175314bb9adc20b948adf36a3574d93 (commit)

Summary of changes:
 README   |    4 +++-
 clawsker |    6 +++---
 2 files changed, 6 insertions(+), 4 deletions(-)


- Log -----------------------------------------------------------------
commit 382ba3f3c84eb3317d2e647ea8ebf06ffa6371f5
Author: Ricardo Mones <ricardo at mones.org>
Date:   Thu Nov 22 00:14:05 2018 +0100

    Use File::Which for searching binary

diff --git a/README b/README
index 956703c..7378050 100644
--- a/README
+++ b/README
@@ -29,10 +29,12 @@ Dependencies
   GTK+3 bindings for Perl - https://gitlab.gnome.org/GNOME/perl-gtk3
   (>= 0.030)
   Locale::gettext - http://search.cpan.org/~pvandry/gettext-1.05/ (>= 1.05)
+  File::Which - https://metacpan.org/pod/File::Which (>= 1.21)
   Claws Mail - http://www.claws-mail.org (>= 3.9.1)
 
   On Debian systems:
-  # apt-get install libgtk3-perl liblocale-gettext-perl claws-mail
+  # apt-get install libgtk3-perl liblocale-gettext-perl libfile-which-perl
+  # apt-get install claws-mail
 
 Install
 -------
diff --git a/clawsker b/clawsker
index b99b656..6c256b3 100755
--- a/clawsker
+++ b/clawsker
@@ -20,6 +20,7 @@ use utf8;
 use version 0.77;
 use Glib qw(TRUE FALSE);
 use Gtk3;
+use File::Which;
 use POSIX qw(setlocale);
 use Locale::gettext;
 use Encode;
@@ -295,9 +296,8 @@ sub version_greater_or_equal {
 }
 
 sub get_claws_version {
-    $_ = qx/which claws-mail/;
-    chomp;
-    return "" unless ($_); # not installed
+    $_ = which ('claws-mail');
+    return "" unless defined $_; # not installed
     my $res = "";
     $_ = qx/$_ -v/;
     chomp;

-----------------------------------------------------------------------


hooks/post-receive
-- 
Hidden preferences editor for Claws Mail