add urlEncode for openUrl setter

2021-04-19 16:42:17 +02:00
parent 17600a886e
commit 67fc1e6fcc
1 changed files with 2 additions and 1 deletions
--- a/74_AMADDevice.pm
+++ b/74_AMADDevice.pm
@ -56,6 +56,7 @@ use GPUtils qw(GP_Import GP_Export);

 main::LoadModule('AMADCommBridge');

+
 my $missingModul = '';
 eval "use Encode qw(encode encode_utf8);1" or $missingModul .= 'Encode ';

@ -793,7 +794,7 @@ sub Set($$@) {

        $path .=
            'openURL?url='
-          . $openurl
+          . urlEncode($openurl)
          . '&browserapp='
          . $bapp
          . '&browserappclass='