This is an automated email from the git hooks/post-receive script. guillem pushed a commit to branch main in repository dpkg.
View the commit online: https://git.dpkg.org/cgit/dpkg/dpkg.git/commit/?id=37b3b0cd868df7b19995aef1209391646645beec commit 37b3b0cd868df7b19995aef1209391646645beec Author: Guillem Jover <[email protected]> AuthorDate: Tue Sep 2 04:54:04 2025 +0200 dselect: Remove unnecessary intermediate variables in method script Changelog: internal --- dselect/methods/media/install.pl | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) diff --git a/dselect/methods/media/install.pl b/dselect/methods/media/install.pl index 257da7f40..3cf452d5b 100755 --- a/dselect/methods/media/install.pl +++ b/dselect/methods/media/install.pl @@ -178,8 +178,6 @@ $SIG{INT} = sub { }; $| = 1; -my $mountpoint = $p_mountpoint; -my $hierbase = $p_hierbase; my $line; my $AVAIL = "$vardir/methods/media/available"; my $STATUS = "$vardir/status"; @@ -262,7 +260,7 @@ if (@media) { } foreach my $need (@media) { - my $disk = get_disk_label($mountpoint, $hierbase); + my $disk = get_disk_label($p_mountpoint, $p_hierbase); print "Processing disc\n $need\n"; @@ -273,9 +271,9 @@ foreach my $need (@media) { do_umount(); <STDIN>; do_mount(); - $? and warn "cannot mount $mountpoint\n"; + $? and warn "cannot mount $p_mountpoint\n"; } continue { - $disk = get_disk_label($mountpoint, $hierbase); + $disk = get_disk_label($p_mountpoint, $p_hierbase); } if (! -d 'tmp') { @@ -289,8 +287,7 @@ foreach my $need (@media) { my $basename; ($basename = $filename{$_}) =~ s/.*\///; - symlink "$mountpoint/$hierbase/$filename{$_}", - "tmp/$basename"; + symlink "$p_mountpoint/$p_hierbase/$filename{$_}", "tmp/$basename"; } chdir 'tmp' or die "cannot chdir to tmp: $!\n"; system 'dpkg', '-iGROEB', q{.}; -- Dpkg.Org's dpkg
