mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added a note for a minor bug

Browse Source 
git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@1477 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
borisneubert
2012-04-22 19:28:21 +00:00
parent e2725bfa9f
commit b983972dba
1 changed files with 13 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
webfrontend/pgm2/01_FHEMWEB.pm
View File

@@ -891,6 +891,7 @@ FW_roomOverview($)
######################## ########################
# Show the overview of devices in one room # Show the overview of devices in one room
# room can be a room, all or Unsorted
sub sub
FW_showRoom() FW_showRoom()
{ {
@@ -903,6 +904,11 @@ FW_showRoom()
FW_pO "<div id=\"content\">"; FW_pO "<div id=\"content\">";
FW_pO "<table>"; # Need for equal width of subtables FW_pO "<table>"; # Need for equal width of subtables
foreach my $ty (sort keys %FW_types) {
FW_pO "$ty<BR>\n";
}
my $rf = ($FW_room ? "&amp;room=$FW_room" : ""); # stay in the room my $rf = ($FW_room ? "&amp;room=$FW_room" : ""); # stay in the room
my $row=1; my $row=1;
foreach my $type (sort keys %FW_types) { foreach my $type (sort keys %FW_types) {
@@ -997,6 +1003,12 @@ FW_fileList($)
$fname =~ m,^(.*)/([^/]*)$,; # Split into dir and file $fname =~ m,^(.*)/([^/]*)$,; # Split into dir and file
my ($dir,$re) = ($1, $2); my ($dir,$re) = ($1, $2);
return if(!$re); return if(!$re);
# note: this fails if the filenames of several FileLogs match the same regexp.
# This is the case e.g. fore
# /var/log/fhem/foo-%Y.log
# /var/log/fhem/foo-%Y-%m-%d.log
# I do not fix it because this could easily be avoided by using a different naming.
# BN 2012-04-22
$re =~ s/%./\.*/g; $re =~ s/%./\.*/g;
my @ret; my @ret;
return @ret if(!opendir(DH, $dir)); return @ret if(!opendir(DH, $dir));