2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-18 05:56:03 +00:00

fhem.pl: newline-escaping-fix, FHEMWEB: column fix

git-svn-id: https://svn.fhem.de/fhem/trunk@4251 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2013-11-19 13:44:02 +00:00
parent ae38d12525
commit 6f36891d37
3 changed files with 4 additions and 2 deletions

View File

@ -1221,7 +1221,7 @@ FW_parseColumns()
my %columns;
my $colNo = -1;
foreach my $roomgroup (split("[ \t][ \t]*", AttrVal($FW_wname,"column",""))) {
foreach my $roomgroup (split("[ \t\r\n]+", AttrVal($FW_wname,"column",""))) {
my ($room, $groupcolumn)=split(":",$roomgroup);
last if(!defined($room) || !defined($groupcolumn));
next if($room ne $FW_room);

View File

@ -979,7 +979,7 @@ CommandInclude($$)
$l =~ s/[\r\n]//g;
if($l =~ m/^(.*)\\ *$/) { # Multiline commands
$bigcmd .= "$1\\\n";
$bigcmd .= "$1\n";
} else {
my $tret = AnalyzeCommandChain($cl, $bigcmd . $l);
push @ret, $tret if(defined($tret));
@ -1215,6 +1215,7 @@ CommandSave($$)
my $def = $defs{$d}{DEF};
if(defined($def)) {
$def =~ s/;/;;/g;
$def =~ s/\n/\\\n/g;
print $fh "define $d $defs{$d}{TYPE} $def\n";
} else {
print $fh "define $d $defs{$d}{TYPE}\n";

View File

@ -17,6 +17,7 @@ table.block tr.odd { background: #111111; }
table.block tr.sel { background: red; }
table { border-radius:8px; border-spacing: 0px;
padding-bottom: 6px; padding-top: 6px; }
table.column { border-spacing: 5px; }
table.room { background: #111111; width: 140px; border:1px solid #CCCCCC; box-shadow:5px 5px 5px #000;}
table.room a { color: #CCCCCC; text-decoration: none; }