This is an automated email from the git hooks/post-receive script. x2go pushed a commit to branch master in repository x2goserver. commit 486611dbf1679ee218b07a7c1042bf4d91dd5b0b Author: Mihai Moldovan <ionic@ionic.de> Date: Mon Nov 23 05:31:11 2020 +0100 {X2Go/Server/Agent/NX/Options.pm,x2goserver/bin/x2goupdateoptionsstring}: fix/silence a few Perl::Critic warnings. --- X2Go/Server/Agent/NX/Options.pm | 8 +++++++- debian/changelog | 3 +++ x2goserver/bin/x2goupdateoptionsstring | 12 ++++++------ 3 files changed, 16 insertions(+), 7 deletions(-) diff --git a/X2Go/Server/Agent/NX/Options.pm b/X2Go/Server/Agent/NX/Options.pm index 83bfb70b..90132422 100644 --- a/X2Go/Server/Agent/NX/Options.pm +++ b/X2Go/Server/Agent/NX/Options.pm @@ -153,7 +153,13 @@ sub parse_options { # Thus going the manual route here. my $last_pos = rindex ($last_component, q{:}); + # There is no English variant for this variable and it's deprecated + # anyway, replaced by the index 0 in most cases. + # We'll keep it for backwards compatibility for now and disable the + # warning. + ## no critic (Variables::ProhibitPunctuationVars) if ($[ > $last_pos) { + ## critic (Variables::ProhibitPunctuationVars) print {*STDERR} "No display port seperator found in the options string. Erroring out.\n"; $error_detected = 1; } @@ -1108,6 +1114,6 @@ both values match. This manual has been written by Mihai Moldovan L<E<lt>ionic@ionic.deE<gt>|mailto:ionic@ionic.de> for the X2Go -project (L<https://www.x2go.org>). +project (L<https://www.x2go.org|https://www.x2go.org>). =cut diff --git a/debian/changelog b/debian/changelog index 40cd42aa..0682e3f5 100644 --- a/debian/changelog +++ b/debian/changelog @@ -313,6 +313,9 @@ x2goserver (4.1.0.4-0x2go1.2) UNRELEASED; urgency=medium abbreviation parsing into a separate function to take out nesting complexity. This trades off nesting complexity (to some degree) with code complexity. + - {X2Go/Server/Agent/NX/Options.pm, + x2goserver/bin/x2goupdateoptionsstring}: fix/silence a few Perl::Critic + warnings. * debian/control: + Build-depend upon lsb-release for distro version detection. * debian/x2goserver.manpages: diff --git a/x2goserver/bin/x2goupdateoptionsstring b/x2goserver/bin/x2goupdateoptionsstring index 689f75c9..b248add8 100755 --- a/x2goserver/bin/x2goupdateoptionsstring +++ b/x2goserver/bin/x2goupdateoptionsstring @@ -255,7 +255,7 @@ sub handle_mode { my %modes = (); foreach my $elem (MODES) { - $modes{(&$elem())[0]} = 1; + $modes{(&{$elem}())[0]} = 1; } my $abbrev_ret = handle_mode_abbrev ($mode); @@ -288,7 +288,7 @@ sub handle_mode { # Now check if value matches a known one. if ((!($error_detected)) && (!($found))) { foreach my $elem (MODES) { - if (exists ($modes{(&$elem())[0]})) { + if (exists ($modes{(&{$elem}())[0]})) { $mode_parse = $elem; $found = 1; last; @@ -311,7 +311,7 @@ sub handle_mode { # Okay, now check for mutual exclusiveness and map to return value. if (!($error_detected)) { - $ret = ($mode_aggregate | (&$mode_parse())[1]); + $ret = ($mode_aggregate | (&{$mode_parse}())[1]); if (($ret) && ($ret & ($ret - 1))) { print {*STDERR} "Mutually exclusive modes specified, erroring out.\n"; @@ -563,8 +563,8 @@ x2goupdateoptionsstring - X2Go Agent Options String Manipulator =head1 DESCRIPTION =for comment -Due to parser oddities, breaking a line during an L<> formatter code right -after the separating pipe character will generate broken links. +Due to parser oddities, breaking a line during an L<dummy|text> formatter code +right after the separating pipe character will generate broken links. Make sure to only break it during the description or, generally, on space characters. A workaround for this as been proposed in @@ -695,6 +695,6 @@ C<x2goupdateoptionsstring '-c' '--' This manual has been written by Mihai Moldovan L<E<lt>ionic@ionic.deE<gt>|mailto:ionic@ionic.de> for the X2Go -project (L<https://www.x2go.org>). +project (L<https://www.x2go.org|https://www.x2go.org>). =cut -- Alioth's /home/x2go-admin/maintenancescripts/git/hooks/post-receive-email on /srv/git/code.x2go.org/x2goserver.git