Apache/jclouds
1
0
Fork 0
mirror of https://github.com/apache/jclouds.git synced 2025-02-16 15:08:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

Changed package name variable from 'package' to 'packageName' to allow for easier reference in Java objects

Browse Source 
git-svn-id: http://jclouds.googlecode.com/svn/trunk@860 3d8758e0-26b5-11de-8745-db77d3ebf521
This commit is contained in:
jamurty 2009-05-27 05:07:54 +00:00
parent 60ca8bafbd
commit ac503f451e
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
aws/src/main/bin/parse_ec2.pl
View File

@ -92,7 +92,7 @@ sub parse_java_type {
$domain->{$awsType} = {
awsType => $awsType,
javaType => $javaType,
package => $domain_package,
packageName => $domain_package,
className => $domain_package . "." . $javaType,
see => ["${refUrl}/ApiReference-ItemType-${awsType}.html"],
fields =>
@ -161,13 +161,13 @@ sub build_commands {
my $awsType = $class->attr('title');
my $command = {
awsType => $awsType,
package => $commands_package . ".$packageName",
packageName => $commands_package . ".$packageName",
className => $commands_package . ".$packageName." . $awsType,
see => ["${refUrl}/ApiReference-query-${awsType}.html"],
response => {
javaType => $awsType . "Response",
awsType => $awsType . "Response",
package => $response_package . ".$packageName",
packageName => $response_package . ".$packageName",
className => $response_package
. ".$packageName."
. $awsType
@ -178,7 +178,7 @@ sub build_commands {
},
options => {
awsType => $awsType . "Options",
package => $options_package . ".$packageName",
packageName => $options_package . ".$packageName",
className => $options_package
. ".$packageName."
. $awsType
@ -187,7 +187,7 @@ sub build_commands {
},
handler => {
awsType => $awsType . "Handler",
package => $xml_package . ".$packageName",
packageName => $xml_package . ".$packageName",
className => $xml_package
. ".$packageName."
. $awsType
@ -453,13 +453,13 @@ sub gen_bean_code_for_command {
# inserts code into the class definitions
sub gen_command {
my $classDef = shift;
my $responsePackage = $${classDef}{response}->{package};
my $responsePackage = $${classDef}{response}->{packageName};
my $optionsImport;
$optionsImport = "import " . $${classDef}{options}->{package} . ".*"
$optionsImport = "import " . $${classDef}{options}->{packageName} . ".*"
if defined $${classDef}{options};
my ${code} = <<EOF;
package $classDef->{package};
package $classDef->{packageName};
import ${domain_package}.*;
import ${responsePackage}.*;
${optionsImport}
@ -527,9 +527,9 @@ EOF
sub gen_bean_code {
my $classDef = shift;
my ${code} = <<EOF;
package $classDef->{package};
package $classDef->{packageName};
EOF
if ( "$classDef->{package}" ne "${domain_package}" ) {
if ( "$classDef->{packageName}" ne "${domain_package}" ) {
${code} = ${code} . <<EOF;
import ${domain_package}.*;