              "##indent##this.##name## = ##name##;\n"
              "##indent##return this;\n"
              "}")     
-     (cons (list "##className##" className) (property-to-replacements property))
+     (cons (list "##className##" className) (to-replacements property))
      indent
      indentLevel))
 

     (concat "public ##type## get##Name##() {\n"
             "##indent##return ##name##;\n"
             "}")     
     (property-to-replacements property)
     indent
     indentLevel))


           (list "##body##" (apply-for-each (lambda(property indent indentLevel)
                                              (apply-template
                                               "this.##name## = ##name##;"
                                               (to-replacements property)
                                               indent
                                               1))
                                            "\n"
