release 1.2.5

CHANGELOG.md

@@ -1,3 +1,8 @@
+1.2.5 (2023-01-04)
+------------------
+
+ - bugfix release
+
 1.2.4 (2022-12-23)
 ------------------
 

mmdebstrap

@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# © 2018 - 2022 Johannes Schauer Marin Rodrigues <josch@mister-muffin.de>
+# © 2018 - 2023 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.4';
+our $VERSION = '1.2.5';
 
 use English;
 use Getopt::Long;
@@ -4489,6 +4489,7 @@ 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) {
@@ -4496,10 +4497,15 @@ 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) {