diff --git a/fhem/CHANGED b/fhem/CHANGED index 472c8fba7..0e343cbdf 100644 --- a/fhem/CHANGED +++ b/fhem/CHANGED @@ -16,6 +16,7 @@ - bugfix: FHEMWEB slider with min > 0 - change: FHEMWEB CORS moved to options - change: FHEMWEB closing old TCP connections + - change: FHEMWEB added "Associated with" to detail-screen - 2012-10-28 (5.3) - feature: added functions trim, ltrim, rtrim, UntoggleDirect, diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm index 5a0d5cc31..6610af2ba 100755 --- a/fhem/FHEM/01_FHEMWEB.pm +++ b/fhem/FHEM/01_FHEMWEB.pm @@ -22,6 +22,7 @@ sub FW_logWrapper($); sub FW_makeEdit($$$); sub FW_makeImage($); sub FW_makeTable($$@); +sub FW_makeTableFromArray($@); sub FW_pH(@); sub FW_pHPlain(@); sub FW_pO(@); @@ -797,7 +798,8 @@ FW_doDetail($) FW_pO "
"; +} +############################## +sub +FW_makeTableFromArray($@) { + my ($txt,@obj) = @_; + if (@obj>0) { + my $row=1; + FW_pO "| ", ($row&1)?"odd":"even"; + $row++; + FW_pH "detail=$_", $_; + FW_pO " | $defs{$_}{TYPE} | "; + FW_pO " |