diff --git a/CHANGED b/CHANGED
index ec4151a50..0ec45531e 100644
--- a/CHANGED
+++ b/CHANGED
@@ -1,5 +1,6 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+ - bugfix:  74_AMADDevice: fix PERL WARNING: Subroutine redefined
  - bugfix:  73_AMADCommBridge: fix bug Undefined subroutine
  - change:  GPUtils: add modul header
  - feature: GPUtils: change Maintainer, add Export Fn
diff --git a/FHEM/74_AMADDevice.pm b/FHEM/74_AMADDevice.pm
index 6c5f46761..723433857 100644
--- a/FHEM/74_AMADDevice.pm
+++ b/FHEM/74_AMADDevice.pm
@@ -54,7 +54,7 @@ use FHEM::Meta;
 use Data::Dumper;    #only for Debugging
 use GPUtils qw(GP_Import GP_Export);
 
-require '73_AMADCommBridge.pm';
+require '73_AMADCommBridge.pm' unless ( defined( *{"main::AMADCommBridge_Initialize"} ) );
 
 my $missingModul = '';
 eval "use Encode qw(encode encode_utf8);1" or $missingModul .= 'Encode ';
@@ -1680,7 +1680,7 @@ sub CreateChangeBtDeviceValue($$) {
   ],
   "release_status": "stable",
   "license": "GPL_2",
-  "version": "v4.4.3",
+  "version": "v4.4.4",
   "author": [
     "Marko Oldenburg <leongaultier@gmail.com>"
   ],