FHEM Forum

Originally posted by: <email address deleted>

Hallo,

könnten die Programmspezialisten bitte eine kleine Änderung in fhem.pl
machen? Da ich Include intensiv benutze, ist die Fehlersuche manchmal etwas
schwierig, daher wäre es schön, wenn beim Start im Log die Datei angezeigt
wird, die gerade per Include gelesen wird.
Ich dachte da an so etwas in der fhem.pl:

sub
CommandInclude($$)
{
  my ($cl, $arg) = @_;
  my $fh;
  my @ret;
  my $oldcfgfile;

  if(!open($fh, $arg)) {
    return "Can't open $arg: $!";
  }
 *  ** Log 3, "Include file: $arg";*
  if(!$init_done &&
     $arg ne AttrVal("global", "statefile", "") &&
     $arg ne AttrVal("global", "configfile", "")) {
    my $nr =  $devcount++;
    $comments{$nr}{TEXT} = "include $arg";
    $comments{$nr}{CFGFN} = $currcfgfile
          if($currcfgfile ne AttrVal("global", "configfile", ""));
  }
...

Bessere Lösungen sind natürlich sehr willkommen.

RueBe

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com

                                                   

> daher wäre es schön, wenn beim Start im Log die Datei angezeigt
> wird, die gerade per Include gelesen wird.

Hab die Zeile hinzugefuegt.

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com

Originally posted by: <email address deleted>

Danke. :-)

Am Mittwoch, 13. Juni 2012 11:20:50 UTC+2 schrieb Ruebezahl:
>
> Hallo,
>
> könnten die Programmspezialisten bitte eine kleine Änderung in fhem.plmachen? Da ich Include intensiv benutze, ist die Fehlersuche manchmal etwas
> schwierig, daher wäre es schön, wenn beim Start im Log die Datei angezeigt
> wird, die gerade per Include gelesen wird.
> Ich dachte da an so etwas in der fhem.pl:
>
> sub
> CommandInclude($$)
> {
>   my ($cl, $arg) = @_;
>   my $fh;
>   my @ret;
>   my $oldcfgfile;
>
>   if(!open($fh, $arg)) {
>     return "Can't open $arg: $!";
>   }
>  *  ** Log 3, "Include file: $arg";*
>   if(!$init_done &&
>      $arg ne AttrVal("global", "statefile", "") &&
>      $arg ne AttrVal("global", "configfile", "")) {
>     my $nr =  $devcount++;
>     $comments{$nr}{TEXT} = "include $arg";
>     $comments{$nr}{CFGFN} = $currcfgfile
>           if($currcfgfile ne AttrVal("global", "configfile", ""));
>   }
> ...
>
> Bessere Lösungen sind natürlich sehr willkommen.
>
> RueBe
>

Am Mittwoch, 13. Juni 2012 11:20:50 UTC+2 schrieb Ruebezahl:
>
> Hallo,
>
> könnten die Programmspezialisten bitte eine kleine Änderung in fhem.plmachen? Da ich Include intensiv benutze, ist die Fehlersuche manchmal etwas
> schwierig, daher wäre es schön, wenn beim Start im Log die Datei angezeigt
> wird, die gerade per Include gelesen wird.
> Ich dachte da an so etwas in der fhem.pl:
>
> sub
> CommandInclude($$)
> {
>   my ($cl, $arg) = @_;
>   my $fh;
>   my @ret;
>   my $oldcfgfile;
>
>   if(!open($fh, $arg)) {
>     return "Can't open $arg: $!";
>   }
>  *  ** Log 3, "Include file: $arg";*
>   if(!$init_done &&
>      $arg ne AttrVal("global", "statefile", "") &&
>      $arg ne AttrVal("global", "configfile", "")) {
>     my $nr =  $devcount++;
>     $comments{$nr}{TEXT} = "include $arg";
>     $comments{$nr}{CFGFN} = $currcfgfile
>           if($currcfgfile ne AttrVal("global", "configfile", ""));
>   }
> ...
>
> Bessere Lösungen sind natürlich sehr willkommen.
>
> RueBe
>

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com