--- loncom/build/Attic/parse.pl	2000/12/14 18:38:37	1.17
+++ loncom/build/Attic/parse.pl	2000/12/21 14:38:31	1.18
@@ -181,6 +181,9 @@ sub make_file_list {
     my @allfiles=keys %{$info{'LOCATION'}{$distribution}};
     foreach my $d (@$dirs) {
 	# set other values
+	$description.=<<END
+BinaryRoot/$d
+END
 	my $dirdescription=$info{'DIRECTORY'}{$distribution}{$d}{'DESCRIPTION'};
 	$dirdescription="(" . $dirdescription . ")" if $dirdescription;
 	# find files that are contained in this directory