From 89bb33015219bd6fb7e790ebb841c0f0bd3525f5 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Mon, 12 Mar 2012 09:59:07 +0100 Subject: [PATCH] 4330 Followup on find-license-problems.pl Content-Type: text/plain; charset="utf-8" Adds current directory as default argument. --- misc/code_fixing/find-license-problems.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/misc/code_fixing/find-license-problems.pl b/misc/code_fixing/find-license-problems.pl index d0c5c30..71f64e0 100755 --- a/misc/code_fixing/find-license-problems.pl +++ b/misc/code_fixing/find-license-problems.pl @@ -60,7 +60,7 @@ sub has_gpl2plus_and_current_fsf_address { ($hasgpl && $hasv2 && $hasorlater && $hasfranklinst); } - +push @ARGV, '.' unless @ARGV; find({ wanted => \&wanted, no_chdir => 1 }, @ARGV); foreach my $name (@files) { if (! has_gpl2plus_and_current_fsf_address($name)) { -- 1.6.0.6