Subversion Repositories HomeAutomation

Rev

Rev 1046 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | SVN | RSS feed

Rev 1046 Rev 1047
Line 112... Line 112...
112 
                foreach my $value ($variable->children('value'))
 112 
                foreach my $value ($variable->children('value'))
113 
                {
 113 
                {
114 
                    my $valueName = $value->att('name');
 114 
                    my $valueName = $value->att('name');
115 
                    $valueName =~ tr/a-z/A-Z/;
 115 
                    $valueName =~ tr/a-z/A-Z/;
116 
               
 116 
               
117 
                    print MYFILE "#define CAN_MODULE_CMD_ENUM_" . $commandType . "_" . $commandName . "_" . $variableName . "_" . $valueName . " " . $value->att('id') . "\n";
 117 
                    print MYFILE "#define CAN_MODULE_ENUM_" . $commandType . "_" . $commandName . "_" . $variableName . "_" . $valueName . " " . $value->att('id') . "\n";
118 
                }
 118 
                }
119 
            }
 119 
            }
120 
        }
 120 
        }
121 
    }
 121 
    }
122 
}
 122 
}