[X2Go-Commits] [x2goserver] 01/04: x2goserver/lib: add new perl wrapper script for X2Go::Utils::is_true called x2goistrue.

[git-admin at x2go.org]

This is an automated email from the git hooks/post-receive script.

x2go pushed a commit to branch master
in repository x2goserver.

commit 966addd7d05aa16187fa59e9e1e7f66d0dcc943d
Author: Mihai Moldovan <ionic at ionic.de>
Date:   Wed Jan 10 03:44:44 2018 +0100

    x2goserver/lib: add new perl wrapper script for X2Go::Utils::is_true called x2goistrue.
---
 debian/changelog          |  2 ++
 x2goserver/lib/x2goistrue | 28 ++++++++++++++++++++++++++++
 2 files changed, 30 insertions(+)

diff --git a/debian/changelog b/debian/changelog
index db98424..ef5af5b 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -201,6 +201,8 @@ x2goserver (4.1.0.0-0x2go1.2) UNRELEASED; urgency=low
       quotes, curly braces et. al.
     - x2goserver/bin/x2goresume-session: fix most other shellcheck warnings,
       more quotes, curly braces et. al.
+    - x2goserver/lib: add new perl wrapper script for X2Go::Utils::is_true
+      called x2goistrue.
   * x2goserver.spec:
     - Only create session DB in x2goserver's post install script. Do use
       proper Requires(post) statements to make sure perl-X2Go-Server-DB and
diff --git a/x2goserver/lib/x2goistrue b/x2goserver/lib/x2goistrue
new file mode 100755
index 0000000..0c938af
--- /dev/null
+++ b/x2goserver/lib/x2goistrue
@@ -0,0 +1,28 @@
+#!/usr/bin/perl
+
+# Copyright (C) 2017-2018 X2Go Project - https://wiki.x2go.org
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the
+# Free Software Foundation, Inc.,
+# 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
+
+use strict;
+
+use X2Go::Utils qw (is_true);
+
+my $value = shift or die "Missing value argument";
+
+print is_true($value)."\n";
+
+exit 0;

--
Alioth's /home/x2go-admin/maintenancescripts/git/hooks/post-receive-email on /srv/git/code.x2go.org/x2goserver.git