Bug#1105817: Firefox::Marionette: firefox 138 needs -remote-allow-system-access argument for $m->download

[Damyan Ivanov]

Package: libfirefox-marionette-perl
Version: 1.63-1
Severity: normal
File: /usr/share/perl5/Firefox/Marionette.pm
Tags: upstream patch

Since the upgrade of firefox to 138, using the 'download' method fails with the
following error:

 System access is required to switch to chrome scope. Start Firefox with 
 "-remote-allow-system-access" to enable it.

Indeed, adding the following after line 4702 of Marionette.pm makes the error
go away:

    if ($self->_is_firefox_major_version_at_least(138)) {
        push @arguments, '-remote-allow-system-access';
    }

The debsums error below is because of that change.




-- Damyan



-- System Information:
Debian Release: 13.0
  APT prefers unstable-debug
  APT policy: (500, 'unstable-debug'), (500, 'unstable'), (500, 'stable'), (1, 'experimental')
Architecture: amd64 (x86_64)

Kernel: Linux 6.12.27-amd64 (SMP w/24 CPU threads; PREEMPT)
Shell: /bin/sh linked to /usr/bin/dash
Init: systemd (via /run/systemd/system)

Versions of packages libfirefox-marionette-perl depends on:
ii  libarchive-zip-perl         1.68-1
ii  libconfig-ini-perl          1:0.029-1
ii  libcrypt-urandom-perl       0.54-1
ii  libencode-perl              3.21-1+b2
ii  libfile-homedir-perl        1.006-2
ii  libjson-perl                4.10000-1
ii  libscalar-list-utils-perl   1:1.63-1+b4
ii  libsocket-perl              2.038-1+b1
ii  libterm-readkey-perl        2.38-2+b4
ii  libtext-csv-xs-perl         1.60-1
ii  liburi-perl                 5.30-1
ii  libxml-parser-perl          2.47-1+b3
ii  perl [libpod-simple-perl]   5.40.1-3
ii  perl-base [libsocket-perl]  5.40.1-3

Versions of packages libfirefox-marionette-perl recommends:
ii  firefox      138.0.3-1
ii  firefox-esr  128.10.0esr-1

libfirefox-marionette-perl suggests no packages.

-- debconf-show failed

-- debsums errors found:
debsums: changed file /usr/share/perl5/Firefox/Marionette.pm (from libfirefox-marionette-perl package)