Commit 52da7a4e authored by unknown's avatar unknown

Strip comments from queries before explaining them. Fixes BUG#34339

parent fb9c0158
......@@ -196,9 +196,10 @@ if (defined ($help)) {
elsif (m/^\s+(.+)$/ ) { # command could be some lines ...
#print "multi-lined ($1)\n";
my ($A)=$1;
chomp $A;
$Param->{Query} .= " $1";
#print "multi-lined ($1)<<$Param->{Query}>>\n";
$A =~ s/\-\-.*//;
$Param->{Query} .= " $A";
#print "multi-lined ($A)<<$Param->{Query}>>\n";
}
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment