From 3e3dfc809f77b41687000edb9b5c84f358a586ba Mon Sep 17 00:00:00 2001
From: betateilchen <betateilchen@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Wed, 6 Feb 2019 17:49:12 +0000
Subject: [PATCH] configDB.pm: prevent perl warning (#96996)

git-svn-id: https://svn.fhem.de/fhem/trunk@18511 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/configDB.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fhem/configDB.pm b/fhem/configDB.pm
index e531e4361..6580809db 100644
--- a/fhem/configDB.pm
+++ b/fhem/configDB.pm
@@ -1016,7 +1016,7 @@ sub _cfgDB_Search($$;$) {
 	$sth = $fhem_dbh->prepare( $sql);
 	Log 5,"configDB: $sql";
 	$sth->execute();
-	$text = " device" if($dsearch);
+	$text = $dsearch ? " device" : "";
 	push @result, "search result for$text: $search in version: $searchversion";
 	push @result, "--------------------------------------------------------------------------------";
 	while (@line = $sth->fetchrow_array()) {