From 00ccef9bf35e61e526984949c2354d0198a6a958 Mon Sep 17 00:00:00 2001
From: marvin78 <marvin78@users.noreply.github.com>
Date: Thu, 31 Jan 2019 19:36:32 +0000
Subject: [PATCH] 98_inotify.pm: better check for perl modules

git-svn-id: https://svn.fhem.de/fhem/trunk@18473 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_inotify.pm | 23 +++++++++++++++++++++--
 1 file changed, 21 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/98_inotify.pm b/fhem/FHEM/98_inotify.pm
index 97bfdd06f..76fbe8992 100644
--- a/fhem/FHEM/98_inotify.pm
+++ b/fhem/FHEM/98_inotify.pm
@@ -4,18 +4,37 @@ package main;
 
 use strict;
 use warnings;
-use Linux::Inotify2;
 use Data::Dumper;
 
 my $missingModule = "";
 
+eval { use Linux::Inotify2; };
+
+unless($@) {
+  Log 4, "inotify - found Linux::Inotify2";
+}
+else {
+  Log 1, "inotify - unable to load Linux::Inotify2 module: $@. Please install with sudo apt-get install liblinux-inotify2-perl"; 
+  $missingModule = "Linux::Inotify2 ";
+}
+
+eval { use File::Find; };
+
+unless($@) {
+  Log 4, "inotify - found File::Find";
+}
+else {
+  Log 1, "inotify - unable to load File::Find module: $@. Please install it."; 
+  $missingModule = "File::Find ";
+}
+
 
 eval "use File::Find;1" or $missingModule .= "File::Find ";
 
 
 #######################
 # Global variables
-my $version = "0.5.8";
+my $version = "0.6.1";
 our $inotify;
 our @watch;