From 02a22cdab198094b8d7be8a97d0dbb7af8076f68 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 8 Aug 2015 12:17:05 +0000
Subject: [PATCH] 01_FHEMWEB.pm: TYPE-List Patch by andre (Forum #39787)

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@9030 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/01_FHEMWEB.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm
index 853b64a9d..a821aa9e1 100755
--- a/fhem/FHEM/01_FHEMWEB.pm
+++ b/fhem/FHEM/01_FHEMWEB.pm
@@ -1000,6 +1000,9 @@ FW_makeTable($$$@)
         } elsif ($n =~ m/^fp_(.*)/ && $defs{$1}){ #special for Floorplan
           FW_pH "detail=$1", $val,1;
 
+        } elsif ($modules{$val} ) {
+          FW_pH "cmd=list%20TYPE=$val", $val,1;
+
         } else {
            FW_pO "<td><div class=\"dval\">".
                    join(",", map { ($_ ne $name && $defs{$_}) ?
@@ -1143,7 +1146,7 @@ FW_makeTableFromArray($$@) {
       FW_pF "<tr class=\"%s\"><td>", ($row&1)?"odd":"even";
       $row++;
       FW_pH "detail=$_", $_;
-      FW_pO "</td><td>$defs{$_}{TYPE}</td><td> </td>";
+      FW_pO "</td><td><a href=$FW_ME?cmd=list%20TYPE=$defs{$_}{TYPE}>$defs{$_}{TYPE}</a></td><td> </td>";
       FW_pO "</tr>";
     }
     FW_pO "</table></div>";