From 317a84e7b24e840f933a0de886c7a429b4d739bb Mon Sep 17 00:00:00 2001 From: Hauke D Date: Tue, 14 Aug 2018 14:38:03 +0200 Subject: [PATCH] Fixed a bug in Perl.outputLine The "chan" argument is no longer prefixed to the output. --- web/webperl.js | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/web/webperl.js b/web/webperl.js index 39d161e..53f2478 100644 --- a/web/webperl.js +++ b/web/webperl.js @@ -144,7 +144,7 @@ Perl.output = function (str,chan) { // can be overridden by the user } }; Perl.outputLine = function (chan,text) { // internal function - if (arguments.length > 1) text = Array.prototype.slice.call(arguments).join(' '); + if (arguments.length > 2) text = Array.prototype.slice.call(arguments,1).join(' '); Perl.output(text,chan); Perl.output("\n",chan); };