| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879 | smalltalk.addClass('Tweet', smalltalk.Widget, ['json'], 'Examples');smalltalk.addMethod('_renderOn_',smalltalk.method({selector: 'renderOn:',fn: function (tr) {    var self = this;    var tdUser = nil;    var tdMessage = nil;    var img = nil;    var a = nil;    var pMessage = nil;    var pDate = nil;    tdUser = smalltalk.send(smalltalk.send(smalltalk.HTMLCanvas || HTMLCanvas, "_new", []), "_td", []);    smalltalk.send(smalltalk.send(tdUser, "_element", []), "_id_", ["user"]);    tdMessage = smalltalk.send(smalltalk.send(smalltalk.HTMLCanvas || HTMLCanvas, "_new", []), "_td", []);    smalltalk.send(smalltalk.send(tdMessage, "_element", []), "_id_", ["messageBox"]);    smalltalk.send(tr, "_append_", [tdUser]);    smalltalk.send(tr, "_append_", [tdMessage]);    img = smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.HTMLCanvas || HTMLCanvas, "_new", []), "_img", []), "_src_", [smalltalk.send(self['@json'], "_at_", ["profile_image_url"])]);    smalltalk.send(smalltalk.send(img, "_element", []), "_title_", [smalltalk.send(self['@json'], "_at_", ["from_user"])]);    smalltalk.send(smalltalk.send(img, "_element", []), "_longDesc_", [smalltalk.send(unescape("http%3A//twitter.com/"), "__comma", [smalltalk.send(self['@json'], "_at_", ["from_user"])])]);    a = smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.HTMLCanvas || HTMLCanvas, "_new", []), "_a", []), "_href_", [smalltalk.send(unescape("http%3A//twitter.com/"), "__comma", [smalltalk.send(self['@json'], "_at_", ["from_user"])])]);    smalltalk.send(a, "_append_", [img]);    smalltalk.send(tdUser, "_append_", [a]);    pMessage = smalltalk.send(smalltalk.send(smalltalk.HTMLCanvas || HTMLCanvas, "_new", []), "_p", []);    smalltalk.send(smalltalk.send(pMessage, "_element", []), "_id_", ["message"]);    smalltalk.send(pMessage, "_append_", [smalltalk.send(self['@json'], "_at_", ["text"])]);    smalltalk.send(tdMessage, "_append_", [pMessage]);    pDate = smalltalk.send(smalltalk.send(smalltalk.HTMLCanvas || HTMLCanvas, "_new", []), "_p", []);    smalltalk.send(smalltalk.send(pDate, "_element", []), "_id_", ["date"]);    smalltalk.send(pDate, "_append_", [smalltalk.send(self['@json'], "_at_", ["created_at"])]);    smalltalk.send(tdMessage, "_append_", [pDate]);    return self;}}),smalltalk.Tweet);smalltalk.addMethod('_json',smalltalk.method({selector: 'json',fn: function () {    var self = this;    return self['@json'];    return self;}}),smalltalk.Tweet);smalltalk.addMethod('_json_',smalltalk.method({selector: 'json:',fn: function (aJson) {    var self = this;    self['@json'] = aJson;    return self;}}),smalltalk.Tweet);smalltalk.addMethod('_openAt_with_',smalltalk.method({selector: 'openAt:with:',fn: function (tr, aJson) {    var self = this;    var tweet = nil;    tweet = smalltalk.send(self, "_new", []);    smalltalk.send(tweet, "_json_", [aJson]);    smalltalk.send(tweet, "_renderOn_", [tr]);    return tr;    return self;}}),smalltalk.Tweet.klass);
 |