Add warning when removing dist where name does not match provided spe…

…c name
hythm7 · Nov 22, 2023 · ad90617 · ad90617
1 parent 637c8b3
commit ad90617
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/Pakku/Command/Remove.rakumod b/lib/Pakku/Command/Remove.rakumod
@@ -37,6 +37,8 @@ multi method fly ( 'remove', :@spec!, Str :$from ) {
 
         sink @dist.map( -> $dist {
 
+          log '🐞', header => 'RMV', msg => ~$dist unless $dist.meta<name> ~~ $spec.name;
+
           $repo.uninstall: $dist;
 
           log '🧚', header => 'RMV', msg => ~$dist;