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=a2032685a7322aca178d4ae8fa771c3ca0b2e151 commit a2032685a7322aca178d4ae8fa771c3ca0b2e151 Author: Guillem Jover <[email protected]> AuthorDate: Tue Sep 2 04:54:04 2025 +0200 dselect: Fix Perl syntax in methods scripts (duped parenthesis) Changelog: internal --- dselect/methods/file/install.sh | 2 +- dselect/methods/media/install.sh | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/dselect/methods/file/install.sh b/dselect/methods/file/install.sh index 6d1c57efd..fa230956a 100755 --- a/dselect/methods/file/install.sh +++ b/dselect/methods/file/install.sh @@ -58,7 +58,7 @@ while true; do $invoke = "$binaryprefix$filename[$i]"; } else { $base = $filename[$i]; $base =~ s,.*/,,; - $c = open(X, "-|")); + $c = open(X, "-|"); if (not defined $c) { die "failed to fork for find: $!\n"; } diff --git a/dselect/methods/media/install.sh b/dselect/methods/media/install.sh index 01b039468..794b6ea3f 100755 --- a/dselect/methods/media/install.sh +++ b/dselect/methods/media/install.sh @@ -112,7 +112,7 @@ Please change the discs and press <RETURN>. $invoke = "$binaryprefix$filename[$i]"; } else { $base = $filename[$i]; $base =~ s,.*/,,; - $c = open(X, "-|")); + $c = open(X, "-|"); if (not defined $c) { die "failed to fork for find: $!\n"; } -- Dpkg.Org's dpkg
