[Savannah-hackers-public] [PATCH] Fix top-level readme and license detection for packages with a single top-level directory.

[Bruno Félix Rezende Ribeiro]

This fixes a regression introduced by the general package processing
logic which inevitably makes the directory structure one level deeper.
---
 gsv-eval.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gsv-eval.pl b/gsv-eval.pl
index d87d7c9..f95b8ab 100755
--- a/gsv-eval.pl
+++ b/gsv-eval.pl
@@ -352,9 +352,9 @@ sub find_binary_data_files
 # Based on '@files', search for few commonly accepted file names.
 sub find_common_files
 {
-       $have_readme = grep { m/^README(\.(txt|md|rst))?$/i } @files ;
-       $have_plain_text_license = grep { m/^(COPYING|LICENSE)$/ } @files;
-       $have_other_license_file = grep { 
m/^(COPYING|LICENSE|GPL|GPL2|GPL3|MIT|BSD|BSD3)(\.txt)$/i } @files;
+       $have_readme = grep { m;^([^/]+/)?README(\.(txt|md|rst))?$;i } @files ;
+       $have_plain_text_license = grep { m;^([^/]+/)?(COPYING|LICENSE)$; } 
@files;
+       $have_other_license_file = grep { 
m;^([^/]+/)?(COPYING|LICENSE|GPL|GPL2|GPL3|MIT|BSD|BSD3)(\.txt)$;i } @files;
 }
 
 
-- 
2.1.4