From c4ed71b23058146f2cfaedf67908b64bb33b77b8 Mon Sep 17 00:00:00 2001 From: jpawlowski Date: Sun, 21 Aug 2016 23:55:55 +0000 Subject: [PATCH] 98_exportdevice.pm: fix newline from version command git-svn-id: https://svn.fhem.de/fhem/trunk@12046 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_exportdevice.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/98_exportdevice.pm b/fhem/FHEM/98_exportdevice.pm index f63cf521a..1688836e0 100755 --- a/fhem/FHEM/98_exportdevice.pm +++ b/fhem/FHEM/98_exportdevice.pm @@ -39,7 +39,7 @@ sub CommandExportdevice($$) { if ( $mname ne $defs{$dev}{TYPE} ) { $mname = $defs{$dev}{TYPE}; my $ver = fhem "version $defs{$dev}{TYPE}"; - $ver =~ s/\n\n+/\n# /g; + $ver =~ s/\n+/\n# /g; $ver =~ s/^/# /g; $str .= "\n\n# TYPE: $defs{$dev}{TYPE}\n$ver\n\n"; } @@ -92,7 +92,7 @@ sub CommandExportdevice($$) { return $return . AttrVal( "global", "version", "fhem.pl:?/?" ) - . "\n# on " + . "\n# at " . TimeNow() . "\n#" . $str if ( $str ne "" );