diff -ur gpt.orig/packaging_tools/perl/scripts/gpt_create_automake_rules gpt/packaging_tools/perl/scripts/gpt_create_automake_rules --- gpt.orig/packaging_tools/perl/scripts/gpt_create_automake_rules 2006-01-11 17:10:12.000000000 +0100 +++ gpt/packaging_tools/perl/scripts/gpt_create_automake_rules 2011-03-24 19:09:21.334573929 +0100 @@ -110,7 +110,10 @@ my $file = $_; my $dir = $File::Find::dir; # print "find_makefile_am: $dir\n"; - $dir =~ s!$topdir/+!!; + if (substr("$dir", 0, length("$topdir")) eq "$topdir") { + $dir = substr("$dir", length("$topdir")); + } + $dir =~ s!^/!!; process_automake_file($file) if ! defined $excluded_dirs{$dir}; }