More fixed to make perl script run cirrectly from any root

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@11551 dc483132-0cff-0310-8789-dd5450dbe970

diff --git a/src/mac/Makefile b/src/mac/Makefile
index de0ac8bb20474ef9eb8097ab4aeccc327c134342..d8b70893783b7b89f7fbb9dce5fdd2d8ccaec844 100644 (file)
--- a/src/mac/Makefile
+++ b/src/mac/Makefile
@@ -106,7 +106,7 @@ profile-library-implementation-version                              = 0
 list-generation-script-folder = "{root-folder}mac:"
 list-generation-script = "{list-generation-script-folder}macfile_gen.pl"
 list-generation-script-root = ".."
-list-generation-script-prefix = ":"
+list-generation-script-prefix = "{root-folder}"
 
 all-files-list                                                                 = {root-folder}"All files.list"
 all-sources-list                                                               = {root-folder}"All sources.list"

diff --git a/src/mac/macfile_gen.pl b/src/mac/macfile_gen.pl
index d8b694161d983de4a584797e1a0b49869e13e9f1..594aca3c115ca6a04a189a36d427b170141b1281 100644 (file)
--- a/src/mac/macfile_gen.pl
+++ b/src/mac/macfile_gen.pl
@@ -46,7 +46,10 @@ if ($action ne "all-files") {
 } else {
 
        @sourceList = &make_macfile_maclist (&make_macfile_list ());
-       @sourceList = map { $prefix . $_;} @sourceList;
+       foreach (@sourcelist) {
+               $_ =~ s/^:/$prefix/;
+       }
+#      @sourceList = map { $prefix . $_;} @sourceList;
        
 }