FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-13 05:06:35 +00:00
Code Issues Releases Wiki Activity

Typos/comments

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@1261 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2012-02-14 08:15:20 +00:00
parent ba9e127365
commit 95bdae3afa
4 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fhem/FHEM/00_CUL.pm
View File

@ -47,7 +47,7 @@ my $clientsSlowRF = ":FS20:FHT:FHT8V:KS300:USF1000:BS:HMS: " .
":CUL_EM:CUL_WS:CUL_FHTTK:CUL_RFR:CUL_HOERMANN: " . ":CUL_EM:CUL_WS:CUL_FHTTK:CUL_RFR:CUL_HOERMANN: " .
":ESA2000:CUL_IR:CUL_TX"; ":ESA2000:CUL_IR:CUL_TX";
my $clientsHomeMatic = ":CUL_HM:HMS:"; my $clientsHomeMatic = ":CUL_HM:HMS:"; # OneWire emulated as HMS on a CUNO
my %matchListSlowRF = ( my %matchListSlowRF = (
"1:USF1000" => "^81..(04|0c)..0101a001a5ceaa00....", "1:USF1000" => "^81..(04|0c)..0101a001a5ceaa00....",
@ -715,7 +715,7 @@ CUL_SendFromQueue($$)
if($bstring ne "") { if($bstring ne "") {
my $sp = AttrVal($name, "sendpool", undef); my $sp = AttrVal($name, "sendpool", undef);
if($sp) { # Is one of the CUL-fellows sending data? if($sp) { # Is one of the CUL-fellows sending data?
my @fellows = split(",", $sp); my @fellows = split(",", $sp);
foreach my $f (@fellows) { foreach my $f (@fellows) {
if($f ne $name && if($f ne $name &&

4
fhem/FHEM/10_CUL_HM.pm
View File

@ -1392,8 +1392,8 @@ CUL_HM_Pair(@)
# Create shadow device for multi-channel # Create shadow device for multi-channel
if($stn eq "switch" && if($stn eq "switch" &&
$devInfo =~ m,(..)(..)(..), ) { $devInfo =~ m,(..)(..)(..), ) {
my ($b1, $b2, $b3) = (hex($1), hex($2), $3); my ($b1, $b2, $b3) = (hex($1)&0xf, hex($2), $3);
for(my $i = $b2+1; $i<=$b1; $i++) { for(my $i = $b2+1; $i<=$b1; $i++) {
my $nSrc = sprintf("%s%02X", $src, $i); my $nSrc = sprintf("%s%02X", $src, $i);
if(!defined($modules{CUL_HM}{defptr}{$nSrc})) { if(!defined($modules{CUL_HM}{defptr}{$nSrc})) {

3
fhem/contrib/FB7390/startfhem
View File

@ -18,11 +18,14 @@ export LD_LIBRARY_PATH=$home/lib
export PERL5LIB=$home/lib/perl5/site_perl/5.12.2/mips-linux:$home/lib/perl5/site_perl/5.12.2:$home/lib/perl5/5.12.2/mips-linux:$home/lib/perl5/5.12.2 export PERL5LIB=$home/lib/perl5/site_perl/5.12.2/mips-linux:$home/lib/perl5/site_perl/5.12.2:$home/lib/perl5/5.12.2/mips-linux:$home/lib/perl5/5.12.2
# let FHEM run as user boxusr80 by adding user fhem with uid of boxusr80 # let FHEM run as user boxusr80 by adding user fhem with uid of boxusr80
# Using this feature the following will not work: ping,WOL,lcd4linux
# start fhem-user
id fhem > /dev/null 2>&1 id fhem > /dev/null 2>&1
if [ "$?" -ne "0" ]; then if [ "$?" -ne "0" ]; then
echo "user fhem does not exist. Adding it." echo "user fhem does not exist. Adding it."
echo "fhem:any:1080:0:fhem:/home-not-used:/bin/sh" >>/var/tmp/passwd echo "fhem:any:1080:0:fhem:/home-not-used:/bin/sh" >>/var/tmp/passwd
fi fi
# end fhem-user
# set file ownership # set file ownership
chown -R boxusr80 ${home}/log chown -R boxusr80 ${home}/log

8
fhem/contrib/survey.pl
View File

@ -13,16 +13,16 @@ my @hw = qw(
OWFS X10 OWTEMP ALL3076 ALL4027 WEBIO WEBIO_12DIGITAL WEBTHERM RFXCOM OREGON OWFS X10 OWTEMP ALL3076 ALL4027 WEBIO WEBIO_12DIGITAL WEBTHERM RFXCOM OREGON
RFXMETER RFXX10REC RFXELSE WS300 Weather EM EMWZ EMEM EMGZ ESA2000 ECMD RFXMETER RFXX10REC RFXELSE WS300 Weather EM EMWZ EMEM EMGZ ESA2000 ECMD
ECMDDevice SCIVT SISPM USBWX WS3600 M232 xxLG7000 M232Counter LGTV ECMDDevice SCIVT SISPM USBWX WS3600 M232 xxLG7000 M232Counter LGTV
M232Voltage WS2000 ALL4000T IPWE VantagePro2 M232Voltage WS2000 ALL4000T IPWE VantagePro2 WOL NetIO230B IT CUL_IR
); );
my @help = qw( my @help = qw(
at notify sequence watchdog FileLog FHEM2FHEM PachLog holiday PID autocreate at average notify sequence watchdog FileLog FHEM2FHEM PachLog holiday PID
dummy structure SUNRISE_EL Utils XmlList updatefhem autocreate dummy structure JsonList SUNRISE_EL Utils XmlList updatefhem
); );
my @fe = ( my @fe = (
"FHEMRENDERER", "fheME", "iPhone: dhs-computertechnik", "iPhone: fhemgw", "FHEMRENDERER", "fheME", "iPhone: dhs-computertechnik", "iPhone: fhemgw",
"iPhone: fhemobile", "iPhone: phyfhem", "myHCE", "pgm2/FHEMWEB with SVG", "iPhone: fhemobile", "iPhone: phyfhem", "myHCE", "pgm2/FHEMWEB with SVG",
"pgm2/FHEMWEB with gnuplot", "pgm3", "pgm5", "HomeMini", "pgm2/FHEMWEB with gnuplot", "pgm3", "pgm5", "HomeMini", "android: andFHEM",
); );
my @platform = ( my @platform = (
"PC: Linux", "OSX", "PC: Windows", "PC: BSD", "Fritz!Box 7390", "Fritz!Box 7270", "PC: Linux", "OSX", "PC: Windows", "PC: BSD", "Fritz!Box 7390", "Fritz!Box 7270",