equal
deleted
inserted
replaced
10 |
10 |
11 # Script to list the available targets in the build package. |
11 # Script to list the available targets in the build package. |
12 # Lists all directories that contain a BLD.INF or bld.inf file. |
12 # Lists all directories that contain a BLD.INF or bld.inf file. |
13 |
13 |
14 use strict; |
14 use strict; |
15 use set_epocroot; |
15 use places; |
16 use usage; |
16 use usage; |
17 use File::Spec; |
17 use File::Spec; |
18 sub list_targets($); |
18 sub list_targets($); |
19 |
19 |
20 my @broken_targs = (File::Spec->catfile("buildtoolguides","sbsv2guide")); |
20 my @broken_targs = (File::Spec->catfile("buildtoolguides","sbsv2guide")); |
21 usage(\@ARGV,"This script lists the available Raptor targets in the build package", |
21 usage(\@ARGV,"This script lists the available Raptor targets in the build package", |
22 "Lists all directories that contain a BLD.INF or bld.inf file"); |
22 "Lists all directories that contain a BLD.INF or bld.inf file"); |
23 |
23 |
24 |
24 my $epocroot = get_epocroot(); |
25 set_epocroot(); |
25 my $build_pkg_dir = get_pkg_dir(); |
26 my $epocroot = $ENV{'EPOCROOT'}; |
|
27 my $build_pkg_dir = File::Spec->catfile("$epocroot","build"); |
|
28 my $build_pkg_dir_parts = File::Spec->splitdir($build_pkg_dir); |
26 my $build_pkg_dir_parts = File::Spec->splitdir($build_pkg_dir); |
29 |
27 |
30 list_targets($build_pkg_dir); |
28 list_targets($build_pkg_dir); |
31 exit 0; |
29 exit 0; |
32 |
30 |