Hi,
You must change in Links/Tools.pm in global_editor sub
$GLOBALS = {};
foreach my $code ($IN->param()) {
next unless ($code =~ /^save-(.*)/);
my $key = $1;
next if ($IN->param("del-$key"));
my $var = $IN->param($code);
$var =~ s/\r?\n/\n/g; # Remove windows linefeeds.
$GLOBALS->{$key} = $var;
}
if ($IN->param('new') and $IN->param('new-val')) {
my $var = $IN->param('new-val');
$var =~ s/\r?\n/\n/g;
$GLOBALS->{$IN->param('new')} = $var;
in
# $GLOBALS = {};
foreach my $code ($IN->param()) {
next unless ($code =~ /^save-(.*)/);
my $key = $1;
next if ($IN->param("del-$key"));
my $var = $IN->param($code);
$var =~ s/\r?\n/\n/g; # Remove windows linefeeds.
# $GLOBALS->{$key} = $var;
$globals->{$key} = $var;
}
if ($IN->param('new') and $IN->param('new-val')) {
my $var = $IN->param('new-val');
$var =~ s/\r?\n/\n/g;
# $GLOBALS->{$IN->param('new')} = $var;
$globals->{$IN->param('new')} = $var;
You must change in Links/Tools.pm in global_editor sub
$GLOBALS = {};
foreach my $code ($IN->param()) {
next unless ($code =~ /^save-(.*)/);
my $key = $1;
next if ($IN->param("del-$key"));
my $var = $IN->param($code);
$var =~ s/\r?\n/\n/g; # Remove windows linefeeds.
$GLOBALS->{$key} = $var;
}
if ($IN->param('new') and $IN->param('new-val')) {
my $var = $IN->param('new-val');
$var =~ s/\r?\n/\n/g;
$GLOBALS->{$IN->param('new')} = $var;
in
# $GLOBALS = {};
foreach my $code ($IN->param()) {
next unless ($code =~ /^save-(.*)/);
my $key = $1;
next if ($IN->param("del-$key"));
my $var = $IN->param($code);
$var =~ s/\r?\n/\n/g; # Remove windows linefeeds.
# $GLOBALS->{$key} = $var;
$globals->{$key} = $var;
}
if ($IN->param('new') and $IN->param('new-val')) {
my $var = $IN->param('new-val');
$var =~ s/\r?\n/\n/g;
# $GLOBALS->{$IN->param('new')} = $var;
$globals->{$IN->param('new')} = $var;