summaryrefslogtreecommitdiff
path: root/modules/Options.pm
diff options
context:
space:
mode:
authorelliott_c <ocielliottc@users.noreply.github.com>2006-01-03 14:27:12 +0000
committerelliott_c <ocielliottc@users.noreply.github.com>2006-01-03 14:27:12 +0000
commit9e0b8deaff41441fa3aa3d187332b6d0941201f7 (patch)
tree9678bbbbca06e28978694c40563dbb3c5535d3f9 /modules/Options.pm
parentb76844b0441a4ae9be2844bd731c4b8b17951fc2 (diff)
downloadMPC-9e0b8deaff41441fa3aa3d187332b6d0941201f7.tar.gz
ChangeLogTag: Tue Jan 3 08:26:34 2006 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/Options.pm')
-rw-r--r--modules/Options.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/modules/Options.pm b/modules/Options.pm
index b70f5de8..d7c8bd14 100644
--- a/modules/Options.pm
+++ b/modules/Options.pm
@@ -18,6 +18,7 @@ use DirectoryManager;
# Data Section
# ************************************************************
+my($deflang) = 'cplusplus';
my(%languages) = ('cplusplus' => 1,
'csharp' => 1,
'java' => 1,
@@ -101,8 +102,9 @@ sub printUsage {
" option can be used multiple times to add directories.\n" .
" -into Place all output files in a mirrored directory\n" .
" structure starting at <directory>.\n" .
-" -language Specify the language preference. The default is\n".
-" cplusplus.\n" .
+" -language Specify the language preference; possible values are\n",
+" [", join(' ', sort keys %languages), "]. The default is\n".
+" $deflang.\n",
" -make_coexistence If multiple 'make' based project types are\n" .
" generated, they will be named such that they can coexist.\n" .
" -name_modifier Modify output names. The pattern passed to this\n" .
@@ -206,7 +208,7 @@ sub options {
my($nmodifier) = undef;
my($into) = undef;
my($hierarchy) = 0;
- my($language) = ($defaults ? 'cplusplus' : undef);
+ my($language) = ($defaults ? $deflang : undef);
my($dynamic) = ($defaults ? 1 : undef);
my($reldefs) = ($defaults ? 1 : undef);
my($toplevel) = ($defaults ? 1 : undef);