Compare commits
No commits in common. "5fd96553f5157a276e6e90e4768e90f2f9f14783" and "60186650cd4d7ed58c85e6bf43ce3e3db95b1176" have entirely different histories.
5fd96553f5
...
60186650cd
2 changed files with 2 additions and 13 deletions
|
@ -1,8 +1,3 @@
|
|||
1.2.5 (2023-01-04)
|
||||
------------------
|
||||
|
||||
- bugfix release
|
||||
|
||||
1.2.4 (2022-12-23)
|
||||
------------------
|
||||
|
||||
|
|
10
mmdebstrap
10
mmdebstrap
|
@ -1,6 +1,6 @@
|
|||
#!/usr/bin/perl
|
||||
#
|
||||
# © 2018 - 2023 Johannes Schauer Marin Rodrigues <josch@mister-muffin.de>
|
||||
# © 2018 - 2022 Johannes Schauer Marin Rodrigues <josch@mister-muffin.de>
|
||||
#
|
||||
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
# of this software and associated documentation files (the "Software"), to
|
||||
|
@ -23,7 +23,7 @@
|
|||
use strict;
|
||||
use warnings;
|
||||
|
||||
our $VERSION = '1.2.5';
|
||||
our $VERSION = '1.2.4';
|
||||
|
||||
use English;
|
||||
use Getopt::Long;
|
||||
|
@ -4489,7 +4489,6 @@ sub main() {
|
|||
# gather all files starting with special prefixes into the
|
||||
# respective keys of a hash
|
||||
my %scripts;
|
||||
my $count = 0;
|
||||
opendir(my $dh, $opt_value)
|
||||
or error "Can't opendir($opt_value): $!";
|
||||
while (my $entry = readdir $dh) {
|
||||
|
@ -4497,15 +4496,10 @@ sub main() {
|
|||
my $hook ('setup', 'extract', 'essential', 'customize') {
|
||||
if ($entry =~ m/^\Q$hook\E/ and -x "$opt_value/$entry") {
|
||||
push @{ $scripts{$hook} }, "$opt_value/$entry";
|
||||
$count += 1;
|
||||
}
|
||||
}
|
||||
}
|
||||
closedir($dh);
|
||||
if ($count == 0) {
|
||||
warning "No executable hook scripts found in $opt_value";
|
||||
return;
|
||||
}
|
||||
# add the sorted list associated with each key to the respective
|
||||
# list of hooks
|
||||
foreach my $hook (keys %scripts) {
|
||||
|
|
Loading…
Reference in a new issue