From 3bd8af00d0b40184e6ef2585778b4a850f9db6de Mon Sep 17 00:00:00 2001
From: betateilchen <betateilchen@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Fri, 20 Feb 2015 17:40:25 +0000
Subject: [PATCH] 98_help.pm: support help for internal commands

attributes
command
commands
devspec
global
perl

git-svn-id: https://svn.fhem.de/fhem/trunk@8046 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_help.pm               |  7 ++++---
 fhem/docs/commandref_frame.html    | 21 +++++++--------------
 fhem/docs/commandref_frame_DE.html | 13 +++++++------
 3 files changed, 18 insertions(+), 23 deletions(-)

diff --git a/fhem/FHEM/98_help.pm b/fhem/FHEM/98_help.pm
index 07cd8e921..6d50fc04c 100644
--- a/fhem/FHEM/98_help.pm
+++ b/fhem/FHEM/98_help.pm
@@ -22,11 +22,12 @@ sub CommandHelp {
 
   if($mod) {
 
+    my $internals = "attributes command commands devspec global perl";
     $mod = lc($mod);
     my $modPath = AttrVal('global','modpath','.');
 	my $output = "";
 
-	if($mod ne 'global') {
+	if($internals !~ m/$mod/) {
       my %mods;
 	  my @modDir = ("$modPath/FHEM");
 
@@ -66,9 +67,9 @@ sub CommandHelp {
 	  return $err if $err;
 
 	  foreach my $l (@text) {
-        if($l =~ m/name=.global./) { 
+        if($l =~ m/name=\"$mod\"/) { 
            $skip = 0;
-        } elsif($l =~ m/^<!-- global.end/) {
+        } elsif($l =~ m/^<!-- $mod.end/) {
            $skip = 1;
         } elsif (!$skip) {
            $output .= $l;
diff --git a/fhem/docs/commandref_frame.html b/fhem/docs/commandref_frame.html
index f2c689c23..48619deaf 100644
--- a/fhem/docs/commandref_frame.html
+++ b/fhem/docs/commandref_frame.html
@@ -210,6 +210,7 @@ telnet) or single client command (via fhem.pl). Example:
     <code>fhem.pl &lt;fhemhost&gt;:7072 "&lt;fhem-command&gt" "..."</code>
 </ul>
 </ul>
+<!-- intro end - diese Zeile nicht entfernen! -->
 
 
 <a name="command"></a>
@@ -273,6 +274,7 @@ A line ending with \ will be concatenated with the next one, so long lines
 (e.g. webpgm2) make editing of multiline commands transparent for you (i.e. there is no need for \) .<br>
 <br>
 </ul>
+<!-- command end - diese Zeile nicht entfernen! -->
 
 
 <a name="devspec"></a>
@@ -325,6 +327,7 @@ A line ending with \ will be concatenated with the next one, so long lines
       structure</a> device.
   </ul>
 </ul>
+<!-- devspec end - diese Zeile nicht entfernen! -->
 
 
 <a name="attributes"></a>
@@ -628,10 +631,11 @@ The following local attributes are used by a wider range of devices:
         <br/>
         Attribute "disable" must be offered by the corresponding module</li>
 </ul>
+<!-- attributes end - diese Zeile nicht entfernen! -->
 
 
 <br><br>
-
+<a name="commands"></a>
 <a name="help"></a>
 <h3>?, help</h3>
 <ul>
@@ -703,7 +707,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="define"></a>
 <h3>define</h3>
 <ul>
@@ -722,7 +725,6 @@ The following local attributes are used by a wider range of devices:
   <br>
 </ul>
 
-
 <a name="delete"></a>
 <h3>delete</h3>
 <ul>
@@ -760,7 +762,6 @@ The following local attributes are used by a wider range of devices:
   <br>
 </ul>
 
-
 <a name="deletereading"></a>
 <h3>deletereading</h3>
 <ul>
@@ -781,7 +782,6 @@ The following local attributes are used by a wider range of devices:
   <br>
 </ul>
 
-
 <a name="displayattr"></a>
 <h3>displayattr</h3>
 <ul>
@@ -827,7 +827,6 @@ The following local attributes are used by a wider range of devices:
 
 </ul>
 
-
 <a name="getstate"></a>
 <h3>getstate</h3>
 <ul>
@@ -849,7 +848,6 @@ The following local attributes are used by a wider range of devices:
 
 </ul>
 
-
 <a name="include"></a>
 <h3>include</h3>
 <ul>
@@ -941,7 +939,6 @@ The following local attributes are used by a wider range of devices:
   </code></pre>
 </ul>
 
-
 <a name="modify"></a>
 <h3>modify</h3>
 <ul>
@@ -977,7 +974,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="reload"></a>
 <h3>reload</h3>
 <ul>
@@ -1007,7 +1003,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="rereadcfg"></a>
 <h3>rereadcfg</h3>
 <ul>
@@ -1051,7 +1046,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="set"></a>
 <h3>set</h3>
 <ul>
@@ -1109,7 +1103,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="setreading"></a>
 <h3>setreading</h3>
 <ul>
@@ -1146,7 +1139,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="shutdown"></a>
 <h3>shutdown</h3>
 <ul>
@@ -1163,7 +1155,6 @@ The following local attributes are used by a wider range of devices:
   </ul>
 </ul>
 
-
 <a name="trigger"></a>
 <h3>trigger</h3>
 <ul>
@@ -1221,6 +1212,7 @@ The following local attributes are used by a wider range of devices:
     </code>
   </ul>
 </ul>
+<!-- commands end - diese Zeile nicht entfernen! -->
 
 <a name="global"></a>
 <h3>global</h3>
@@ -1559,6 +1551,7 @@ The following local attributes are used by a wider range of devices:
 
   <br>
   <br>
+<!-- perl end - diese Zeile nicht entfernen! -->
 
 <a name="gnuplot-syntax"></a>
 <h3>gnuplot file syntax</h3>
diff --git a/fhem/docs/commandref_frame_DE.html b/fhem/docs/commandref_frame_DE.html
index fb110e268..db477052f 100644
--- a/fhem/docs/commandref_frame_DE.html
+++ b/fhem/docs/commandref_frame_DE.html
@@ -208,6 +208,7 @@ Die Kommunikation mit FHEM kann entweder in einer "session" (&uuml;ber telnet) o
 </ul>
 </ul>
 <br>
+<!-- intro end - diese Zeile nicht entfernen! -->
 
 
 <a name="command"></a>
@@ -277,6 +278,7 @@ Web-Frontends (z.B. webpgm2) erleichtern die Eingabe von sich &uuml;ber mehrere
 Zeilen erstreckende Befehle, indem man keine \ am Zeilenende eingeben muss.</p>
 <p>&nbsp;</p>
 </ul>
+<!-- command end - diese Zeile nicht entfernen! -->
 
 
 <a name="devspec"></a>
@@ -336,7 +338,7 @@ Zeilen erstreckende Befehle, indem man keine \ am Zeilenende eingeben muss.</p>
       bitte den Abschnitt zu <a href="#structure"> structure</a>.
   </ul>
 </ul>
-
+<!-- devspec end - diese Zeile nicht entfernen! -->
 
 
 <a name="attributes"></a>
@@ -649,13 +651,10 @@ Die folgenden lokalen Attribute werden von mehreren Ger&auml;ten verwendet:
       <code>attr &lt;device&gt; disable toggle</code><br/>
     </li>
 </ul>
-
-
+<!-- attributes end - diese Zeile nicht entfernen! -->
 <br><br>
 
-
-
-
+<a name="commands"></a>
 <a name="help"></a>
 <h3>?, help</h3>
 <ul>
@@ -1291,6 +1290,7 @@ Die folgenden lokalen Attribute werden von mehreren Ger&auml;ten verwendet:
     </code>
   </ul>
 </ul>
+<!-- commands end - diese Zeile nicht entfernen! -->
 
 
 <a name="global"></a>
@@ -1665,6 +1665,7 @@ Die folgenden lokalen Attribute werden von mehreren Ger&auml;ten verwendet:
 
   <br>
   <br>
+<!-- perl end - diese Zeile nicht entfernen! -->
 
 <a name="gnuplot-syntax"></a>
 <h3>gnuplot file syntax</h3>