GPUtils: Change Maintainer, add Export Fn

git-svn-id: https://svn.fhem.de/fhem/trunk@19663 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/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.
+ - feature: GPUtils: change Maintainer, add Export Fn
  - feature: 73_AMADCommBridge: change version code
  - feature: 31_HUEDevice: added configList attribute
                          added optional setsensor|configsensor param to set json

fhem/FHEM/GPUtils.pm

@@ -7,7 +7,7 @@ use Exporter qw( import );
 use strict;
 use warnings;
 
-our %EXPORT_TAGS = (all => [qw(GP_Define GP_Catch GP_ForallClients GP_Import)]);
+our %EXPORT_TAGS = (all => [qw(GP_Define GP_Catch GP_ForallClients GP_Import GP_Export)]);
 Exporter::export_ok_tags('all');
 
 #add FHEM/lib to @INC if it's not allready included. Should rather be in fhem.pl than here though...
@@ -63,5 +63,16 @@ sub GP_Import(@)
   }
 }
 
+sub GP_Export(@)
+{
+    no strict qw/refs/;    ## no critic
+    my $pkg  = caller(0);
+    my $main = $pkg;
+    $main =~ s/^(?:.+::)?([^:]+)$/main::$1\_/g;
+    foreach (@_) {
+        *{ $main . $_ } = *{ $pkg . '::' . $_ };
+    }
+}
+
 1;
 

fhem/MAINTAINER.txt

@@ -540,7 +540,7 @@ FHEM/CoProcess.pm            justme1968           Sonstiges
 FHEM/DarkSkyAPI.pm           CoolTux              Unterstützende Dienste/Wettermodule
 FHEM/DevIo.pm                rudolfkoenig         Sonstiges
 FHEM/FritzBoxUtils.pm        rudolfkoenig         FRITZ!Box
-FHEM/GPUtils.pm              ntruchsess           FHEM Development
+FHEM/GPUtils.pm              CoolTux              FHEM Development
 FHEM/HMCCUConf.pm            zap                  HomeMatic
 FHEM/HMConfig.pm             martinp876           HomeMatic
 FHEM/HOMESTATEtk.pm          loredo               Automatisierung