1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006 |
- smalltalk.addPackage('Canvas');
- smalltalk.addClass('HTMLCanvas', smalltalk.Object, ['root'], 'Canvas');
- smalltalk.HTMLCanvas.comment="I am a canvas for building HTML.\x0a\x0aI provide the `#tag:` method to create a `TagBrush` (wrapping a DOM element) and convenience methods in the `tags` protocol.\x0a\x0a## API\x0a\x0aMy instances are used as the argument of the `#renderOn:` method of `Widget` objects.\x0a\x0aThe `#with:` method is used to compose HTML, nesting tags. `#with:` can take a `TagBrush`, a `String`, a `BlockClosure` or a `Widget` as argument.\x0a\x0a## Usage example:\x0a\x0a aCanvas a \x0a with: [ aCanvas span with: 'click me' ];\x0a onClick: [ window alert: 'clicked!' ]";
- smalltalk.addMethod(
- smalltalk.method({
- selector: "a",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("a");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"a",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "a\x0a\x09^self tag: 'a'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "abbr",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("abbr");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"abbr",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "abbr\x0a\x09^self tag: 'abbr'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "address",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("address");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"address",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "address\x0a\x09^self tag: 'address'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "area",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("area");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"area",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "area\x0a\x09^self tag: 'area'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "article",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("article");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"article",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "article\x0a\x09^self tag: 'article'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "aside",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("aside");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"aside",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "aside\x0a\x09^self tag: 'aside'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "audio",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("audio");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"audio",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "audio\x0a\x09^self tag: 'audio'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "base",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("base");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"base",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "base\x0a\x09^self tag: 'base'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "blockquote",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("blockquote");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"blockquote",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "blockquote\x0a\x09^self tag: 'blockquote'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "body",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("body");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"body",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "body\x0a\x09^self tag: 'body'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "br",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("br");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"br",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "br\x0a\x09^self tag: 'br'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "button",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("button");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"button",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "button\x0a\x09^self tag: 'button'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "canvas",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("canvas");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"canvas",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "canvas\x0a\x09^self tag: 'canvas'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "caption",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("caption");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"caption",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "caption\x0a\x09^self tag: 'caption'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "cite",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("cite");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"cite",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "cite\x0a\x09^self tag: 'cite'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "code",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("code");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"code",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "code\x0a\x09^self tag: 'code'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "col",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("col");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"col",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "col\x0a\x09^self tag: 'col'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "colgroup",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("colgroup");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"colgroup",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "colgroup\x0a\x09^self tag: 'colgroup'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "command",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("command");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"command",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "command\x0a\x09^self tag: 'command'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "datalist",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("datalist");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"datalist",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "datalist\x0a\x09^self tag: 'datalist'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "dd",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("dd");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"dd",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "dd\x0a\x09^self tag: 'dd'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "del",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("del");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"del",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "del\x0a\x09^self tag: 'del'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "details",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("details");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"details",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "details\x0a\x09^self tag: 'details'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "div",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("div");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"div",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "div\x0a\x09^self tag: 'div'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "div:",
- category: 'tags',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._div())._with_(aBlock);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"div:",{aBlock:aBlock},smalltalk.HTMLCanvas)})},
- args: ["aBlock"],
- source: "div: aBlock\x0a\x09^self div with: aBlock",
- messageSends: ["with:", "div"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "dl",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("dl");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"dl",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "dl\x0a\x09^self tag: 'dl'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "dt",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("dt");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"dt",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "dt\x0a\x09^self tag: 'dt'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "em",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("em");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"em",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "em\x0a\x09^self tag: 'em'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "embed",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("embed");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"embed",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "embed\x0a\x09^self tag: 'embed'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "entity:",
- category: 'adding',
- fn: function (aString){
- var self=this;
- var result;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- result=_st(_st("<span />"._asJQuery())._html_(_st("&".__comma(aString)).__comma(";")))._text();
- $1=_st(_st(result)._size()).__eq((1));
- if(! smalltalk.assert($1)){
- self._error_("Not an HTML entity: ".__comma(aString));
- };
- self._with_(result);
- return self}, function($ctx1) {$ctx1.fill(self,"entity:",{aString:aString,result:result},smalltalk.HTMLCanvas)})},
- args: ["aString"],
- source: "entity: aString\x0a\x09\x22Adds a character representing html entity, eg.\x0a\x09html entity: 'copy'\x0a\x09adds a copyright sign.\x0a\x09If a name does not represent valid HTML entity, error is raised.\x22\x0a\x09| result |\x0a\x09result := ('<span />' asJQuery html: '&', aString, ';') text.\x0a\x09result size = 1 ifFalse: [ self error: 'Not an HTML entity: ', aString ].\x0a\x09self with: result",
- messageSends: ["text", "html:", ",", "asJQuery", "ifFalse:", "error:", "=", "size", "with:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "fieldset",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("fieldset");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"fieldset",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "fieldset\x0a\x09^self tag: 'fieldset'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "figcaption",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("figcaption");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"figcaption",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "figcaption\x0a\x09^self tag: 'figcaption'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "figure",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("figure");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"figure",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "figure\x0a\x09^self tag: 'figure'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "footer",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("footer");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"footer",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "footer\x0a\x09^self tag: 'footer'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "form",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("form");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"form",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "form\x0a\x09^self tag: 'form'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h1",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("h1");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h1",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "h1\x0a\x09^self tag: 'h1'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h1:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._h1())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h1:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "h1: anObject\x0a\x09^self h1 with: anObject",
- messageSends: ["with:", "h1"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h2",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("h2");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h2",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "h2\x0a\x09^self tag: 'h2'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h2:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._h2())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h2:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "h2: anObject\x0a\x09^ self h2 with: anObject",
- messageSends: ["with:", "h2"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h3",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("h3");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h3",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "h3\x0a\x09^self tag: 'h3'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h3:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._h3())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h3:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "h3: anObject\x0a\x09^self h3 with: anObject",
- messageSends: ["with:", "h3"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h4",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("h4");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h4",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "h4\x0a\x09^self tag: 'h4'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h4:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._h4())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h4:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "h4: anObject\x0a\x09^self h4 with: anObject",
- messageSends: ["with:", "h4"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h5",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("h5");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h5",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "h5\x0a\x09^self tag: 'h5'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h5:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._h5())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h5:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "h5: anObject\x0a\x09^self h5 with: anObject",
- messageSends: ["with:", "h5"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h6",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("h6");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h6",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "h6\x0a\x09^self tag: 'h6'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "h6:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._h6())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"h6:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "h6: anObject\x0a\x09^self h6 with: anObject",
- messageSends: ["with:", "h6"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "head",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("head");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"head",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "head\x0a\x09^self tag: 'head'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "header",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("header");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"header",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "header\x0a\x09^self tag: 'header'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "hgroup",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("hgroup");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"hgroup",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "hgroup\x0a\x09^self tag: 'hgroup'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "hr",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("hr");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"hr",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "hr\x0a\x09^self tag: 'hr'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "html",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("html");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"html",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "html\x0a\x09^self tag: 'html'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "iframe",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("iframe");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"iframe",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "iframe\x0a\x09^self tag: 'iframe'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "iframe:",
- category: 'tags',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._iframe())._src_(aString);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"iframe:",{aString:aString},smalltalk.HTMLCanvas)})},
- args: ["aString"],
- source: "iframe: aString\x0a\x09^self iframe src: aString",
- messageSends: ["src:", "iframe"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "img",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("img");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"img",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "img\x0a\x09^self tag: 'img'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "img:",
- category: 'tags',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._img())._src_(aString);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"img:",{aString:aString},smalltalk.HTMLCanvas)})},
- args: ["aString"],
- source: "img: aString\x0a\x09^self img src: aString",
- messageSends: ["src:", "img"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initialize",
- category: 'initialization',
- fn: function (){
- var self=this;
- function $TagBrush(){return smalltalk.TagBrush||(typeof TagBrush=="undefined"?nil:TagBrush)}
- return smalltalk.withContext(function($ctx1) {
- var $1;
- smalltalk.Object.fn.prototype._initialize.apply(_st(self), []);
- $1=self["@root"];
- if(($receiver = $1) == nil || $receiver == undefined){
- self["@root"]=_st($TagBrush())._fromString_canvas_("div",self);
- self["@root"];
- } else {
- $1;
- };
- return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "initialize\x0a\x09super initialize.\x0a\x09root ifNil: [root := TagBrush fromString: 'div' canvas: self]",
- messageSends: ["initialize", "ifNil:", "fromString:canvas:"],
- referencedClasses: ["TagBrush"]
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initializeFromJQuery:",
- category: 'initialization',
- fn: function (aJQuery){
- var self=this;
- function $TagBrush(){return smalltalk.TagBrush||(typeof TagBrush=="undefined"?nil:TagBrush)}
- return smalltalk.withContext(function($ctx1) {
- self["@root"]=_st($TagBrush())._fromJQuery_canvas_(aJQuery,self);
- return self}, function($ctx1) {$ctx1.fill(self,"initializeFromJQuery:",{aJQuery:aJQuery},smalltalk.HTMLCanvas)})},
- args: ["aJQuery"],
- source: "initializeFromJQuery: aJQuery\x0a\x09root := TagBrush fromJQuery: aJQuery canvas: self",
- messageSends: ["fromJQuery:canvas:"],
- referencedClasses: ["TagBrush"]
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "input",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("input");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"input",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "input\x0a\x09^self tag: 'input'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("label");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "label\x0a\x09^self tag: 'label'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "legend",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("legend");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"legend",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "legend\x0a\x09^self tag: 'legend'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "li",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("li");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"li",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "li\x0a\x09^self tag: 'li'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "li:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._li())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"li:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "li: anObject\x0a\x09^self li with: anObject",
- messageSends: ["with:", "li"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "link",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("link");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"link",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "link\x0a\x09^self tag: 'link'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "map",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("map");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"map",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "map\x0a\x09^self tag: 'map'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "mark",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("mark");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"mark",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "mark\x0a\x09^self tag: 'mark'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menu",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("menu");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"menu",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "menu\x0a\x09^self tag: 'menu'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "meta",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("meta");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"meta",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "meta\x0a\x09^self tag: 'meta'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "nav",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("nav");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"nav",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "nav\x0a\x09^self tag: 'nav'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "newTag:",
- category: 'tags',
- fn: function (aString){
- var self=this;
- var tag;
- function $TagBrush(){return smalltalk.TagBrush||(typeof TagBrush=="undefined"?nil:TagBrush)}
- return smalltalk.withContext(function($ctx1) {
- var $1;
- tag=_st($TagBrush())._fromString_canvas_(aString,self);
- _st(tag)._at_put_("amberContext","yepp");
- _st(_st(tag)._element())._at_put_("amberContext",_st(_st(_st(_st(smalltalk.getThisContext()._outerContext())._outerContext())._outerContext())._methodContext())._method());
- $1=tag;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"newTag:",{aString:aString,tag:tag},smalltalk.HTMLCanvas)})},
- args: ["aString"],
- source: "newTag: aString\x0a\x09| tag |\x0a\x09tag := TagBrush fromString: aString canvas: self.\x0a\x09tag at: 'amberContext' put: 'yepp'.\x0a\x09tag element at: 'amberContext' put: thisContext outerContext outerContext outerContext methodContext method.\x0a\x09^ tag",
- messageSends: ["fromString:canvas:", "at:put:", "method", "methodContext", "outerContext", "element"],
- referencedClasses: ["TagBrush"]
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "noscript",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("noscript");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"noscript",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "noscript\x0a\x09^self tag: 'noscript'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "object",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("object");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"object",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "object\x0a\x09^self tag: 'object'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "ol",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("ol");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"ol",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "ol\x0a\x09^self tag: 'ol'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "ol:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._ol())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"ol:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "ol: anObject\x0a\x09^self ol with: anObject",
- messageSends: ["with:", "ol"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "optgroup",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("optgroup");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"optgroup",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "optgroup\x0a\x09^self tag: 'optgroup'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "option",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("option");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"option",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "option\x0a\x09^self tag: 'option'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "output",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("output");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"output",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "output\x0a\x09^self tag: 'output'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "p",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("p");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"p",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "p\x0a\x09^self tag: 'p'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "p:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._p())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"p:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "p: anObject\x0a\x09^self p with: anObject",
- messageSends: ["with:", "p"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "param",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("param");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"param",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "param\x0a\x09^self tag: 'param'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "pre",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("pre");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"pre",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "pre\x0a\x09^self tag: 'pre'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "progress",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("progress");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"progress",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "progress\x0a\x09^self tag: 'progress'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "root",
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@root"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"root",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "root\x0a\x09^root",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "root:",
- category: 'accessing',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@root"]=aTagBrush;
- return self}, function($ctx1) {$ctx1.fill(self,"root:",{aTagBrush:aTagBrush},smalltalk.HTMLCanvas)})},
- args: ["aTagBrush"],
- source: "root: aTagBrush\x0a\x09root := aTagBrush",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "script",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("script");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"script",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "script\x0a\x09^self tag: 'script'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "section",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("section");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"section",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "section\x0a\x09^self tag: 'section'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "select",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("select");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"select",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "select\x0a\x09^self tag: 'select'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "small",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("small");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"small",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "small\x0a\x09^self tag: 'small'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "snippet:",
- category: 'accessing',
- fn: function (anElement){
- var self=this;
- var clone,caret;
- function $TagBrush(){return smalltalk.TagBrush||(typeof TagBrush=="undefined"?nil:TagBrush)}
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- clone=_st(_st(anElement)._asJQuery())._clone();
- self._with_(_st($TagBrush())._fromJQuery_canvas_(clone,self));
- caret=_st(clone)._find_("[data-snippet=\x22*\x22]");
- $1=_st(_st(caret)._toArray())._isEmpty();
- if(smalltalk.assert($1)){
- caret=clone;
- caret;
- };
- $2=_st($TagBrush())._fromJQuery_canvas_(_st(caret)._removeAttr_("data-snippet"),self);
- return $2;
- }, function($ctx1) {$ctx1.fill(self,"snippet:",{anElement:anElement,clone:clone,caret:caret},smalltalk.HTMLCanvas)})},
- args: ["anElement"],
- source: "snippet: anElement\x0a\x09\x22Adds clone of anElement, finds [data-snippet=\x22\x22*\x22\x22] subelement\x0a\x09and returns TagBrush as if that subelement was just added.\x0a\x09\x0a\x09Rarely needed to use directly, use `html foo` dynamically installed method\x0a\x09for a snippet named foo.\x22\x0a\x09\x0a\x09| clone caret |\x0a\x09\x0a\x09clone := anElement asJQuery clone.\x0a\x09self with: (TagBrush fromJQuery: clone canvas: self).\x0a\x09caret := clone find: '[data-snippet=\x22*\x22]'.\x0a\x09caret toArray isEmpty ifTrue: [ caret := clone ].\x0a\x09^TagBrush fromJQuery: (caret removeAttr: 'data-snippet') canvas: self",
- messageSends: ["clone", "asJQuery", "with:", "fromJQuery:canvas:", "find:", "ifTrue:", "isEmpty", "toArray", "removeAttr:"],
- referencedClasses: ["TagBrush"]
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "source",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("source");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"source",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "source\x0a\x09^self tag: 'source'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "span",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("span");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"span",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "span\x0a\x09^self tag: 'span'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "span:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._span())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"span:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "span: anObject\x0a\x09^self span with: anObject",
- messageSends: ["with:", "span"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "strong",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("strong");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"strong",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "strong\x0a\x09^self tag: 'strong'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "strong:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._strong())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"strong:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "strong: anObject\x0a\x09^self strong with: anObject",
- messageSends: ["with:", "strong"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "style",
- category: 'tags',
- fn: function (){
- var self=this;
- function $StyleTag(){return smalltalk.StyleTag||(typeof StyleTag=="undefined"?nil:StyleTag)}
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self["@root"])._addBrush_(_st($StyleTag())._canvas_(self));
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"style",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "style\x0a\x09^ root addBrush: (StyleTag canvas: self)",
- messageSends: ["addBrush:", "canvas:"],
- referencedClasses: ["StyleTag"]
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "style:",
- category: 'tags',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=self._style();
- _st($2)._with_(aString);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"style:",{aString:aString},smalltalk.HTMLCanvas)})},
- args: ["aString"],
- source: "style: aString\x0a\x09^ self style with: aString; yourself",
- messageSends: ["with:", "style", "yourself"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "sub",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("sub");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"sub",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "sub\x0a\x09^self tag: 'sub'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "summary",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("summary");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"summary",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "summary\x0a\x09^self tag: 'summary'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "sup",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("sup");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"sup",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "sup\x0a\x09^self tag: 'sup'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "table",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("table");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"table",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "table\x0a\x09^self tag: 'table'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "tag:",
- category: 'tags',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self["@root"])._addBrush_(self._newTag_(aString));
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"tag:",{aString:aString},smalltalk.HTMLCanvas)})},
- args: ["aString"],
- source: "tag: aString\x0a\x09^root addBrush: (self newTag: aString)",
- messageSends: ["addBrush:", "newTag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "tbody",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("tbody");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"tbody",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "tbody\x0a\x09^self tag: 'tbody'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "td",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("td");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"td",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "td\x0a\x09^self tag: 'td'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "textarea",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("textarea");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"textarea",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "textarea\x0a\x09^self tag: 'textarea'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "tfoot",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("tfoot");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"tfoot",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "tfoot\x0a\x09^self tag: 'tfoot'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "th",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("th");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"th",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "th\x0a\x09^self tag: 'th'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "thead",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("thead");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"thead",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "thead\x0a\x09^self tag: 'thead'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "time",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("time");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"time",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "time\x0a\x09^self tag: 'time'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "title",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("title");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"title",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "title\x0a\x09^self tag: 'title'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "tr",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("tr");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"tr",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "tr\x0a\x09^self tag: 'tr'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "ul",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("ul");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"ul",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "ul\x0a\x09^self tag: 'ul'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "ul:",
- category: 'tags',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._ul())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"ul:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "ul: anObject\x0a\x09^self ul with: anObject",
- messageSends: ["with:", "ul"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "video",
- category: 'tags',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self._tag_("video");
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"video",{},smalltalk.HTMLCanvas)})},
- args: [],
- source: "video\x0a\x09^self tag: 'video'",
- messageSends: ["tag:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "with:",
- category: 'adding',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._root())._with_(anObject);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"with:",{anObject:anObject},smalltalk.HTMLCanvas)})},
- args: ["anObject"],
- source: "with: anObject\x0a\x09^self root with: anObject",
- messageSends: ["with:", "root"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "browserVersion",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(jQuery)._at_("browser"))._version();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"browserVersion",{},smalltalk.HTMLCanvas.klass)})},
- args: [],
- source: "browserVersion\x0a\x09^(jQuery at: #browser) version",
- messageSends: ["version", "at:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isMSIE",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(jQuery)._at_("browser"))._at_("msie"))._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isMSIE",{},smalltalk.HTMLCanvas.klass)})},
- args: [],
- source: "isMSIE\x0a\x09^((jQuery at: #browser) at: #msie) notNil",
- messageSends: ["notNil", "at:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isMozilla",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(jQuery)._at_("browser"))._at_("mozilla"))._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isMozilla",{},smalltalk.HTMLCanvas.klass)})},
- args: [],
- source: "isMozilla\x0a\x09^((jQuery at: #browser) at: #mozilla) notNil",
- messageSends: ["notNil", "at:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isOpera",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(jQuery)._at_("browser"))._at_("opera"))._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isOpera",{},smalltalk.HTMLCanvas.klass)})},
- args: [],
- source: "isOpera\x0a\x09^((jQuery at: #browser) at: #opera) notNil",
- messageSends: ["notNil", "at:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isWebkit",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(jQuery)._at_("browser"))._at_("webkit"))._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isWebkit",{},smalltalk.HTMLCanvas.klass)})},
- args: [],
- source: "isWebkit\x0a\x09^((jQuery at: #browser) at: #webkit) notNil",
- messageSends: ["notNil", "at:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onJQuery:",
- category: 'instance creation',
- fn: function (aJQuery){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=self._basicNew();
- _st($2)._initializeFromJQuery_(aJQuery);
- _st($2)._initialize();
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"onJQuery:",{aJQuery:aJQuery},smalltalk.HTMLCanvas.klass)})},
- args: ["aJQuery"],
- source: "onJQuery: aJQuery\x0a\x09^self basicNew\x0a\x09\x09initializeFromJQuery: aJQuery;\x0a\x09\x09initialize;\x0a\x09\x09yourself",
- messageSends: ["initializeFromJQuery:", "basicNew", "initialize", "yourself"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvas.klass);
- smalltalk.addClass('HTMLCanvasInspector', smalltalk.Object, [], 'Canvas');
- smalltalk.HTMLCanvasInspector.comment="I am used to inspect DOM elements built with Amber using the HTML canvas.";
- smalltalk.addMethod(
- smalltalk.method({
- selector: "activate",
- category: 'as yet unclassified',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._amberDOMElements())._do_((function(each){
- return smalltalk.withContext(function($ctx2) {
- return self._installCanvasInspectorOn_(each);
- }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
- return self}, function($ctx1) {$ctx1.fill(self,"activate",{},smalltalk.HTMLCanvasInspector)})},
- args: [],
- source: "activate\x0a\x09\x22nasty nasty\x22\x0a\x09\x0a\x09self amberDOMElements do: [ :each |\x0a\x09\x09self installCanvasInspectorOn: each ]",
- messageSends: ["do:", "installCanvasInspectorOn:", "amberDOMElements"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "amberDOMElements",
- category: 'as yet unclassified',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(window)._jQuery_("[amberContext=yepp]"))._toArray();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"amberDOMElements",{},smalltalk.HTMLCanvasInspector)})},
- args: [],
- source: "amberDOMElements\x0a\x09^ (window jQuery: '[amberContext=yepp]') toArray",
- messageSends: ["toArray", "jQuery:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "deactivate",
- category: 'as yet unclassified',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._amberDOMElements())._do_((function(each){
- return smalltalk.withContext(function($ctx2) {
- return self._restore_(each);
- }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
- return self}, function($ctx1) {$ctx1.fill(self,"deactivate",{},smalltalk.HTMLCanvasInspector)})},
- args: [],
- source: "deactivate\x0a\x09self amberDOMElements do: [ :each |\x0a\x09\x09self restore: each ]",
- messageSends: ["do:", "restore:", "amberDOMElements"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inspect",
- category: 'as yet unclassified',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._activate();
- return self}, function($ctx1) {$ctx1.fill(self,"inspect",{},smalltalk.HTMLCanvasInspector)})},
- args: [],
- source: "inspect\x0a\x09self activate",
- messageSends: ["activate"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inspect:",
- category: 'as yet unclassified',
- fn: function (aDOMElement){
- var self=this;
- var jquery,method;
- return smalltalk.withContext(function($ctx1) {
- self._deactivate();
- method=_st(aDOMElement)._at_("amberContext");
- _st(console)._log_(_st(_st(_st(_st(method)._methodClass())._name()).__comma(" >> #")).__comma(_st(method)._selector()));
- return self}, function($ctx1) {$ctx1.fill(self,"inspect:",{aDOMElement:aDOMElement,jquery:jquery,method:method},smalltalk.HTMLCanvasInspector)})},
- args: ["aDOMElement"],
- source: "inspect: aDOMElement\x0a\x09| jquery method |\x0a\x09\x0a\x09self deactivate.\x0a\x09\x0a\x09method := (aDOMElement at: 'amberContext').\x0a\x09console log: method methodClass name, ' >> #', method selector",
- messageSends: ["deactivate", "at:", "log:", ",", "selector", "name", "methodClass"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "installCanvasInspectorOn:",
- category: 'as yet unclassified',
- fn: function (aDOMElement){
- var self=this;
- var jquery,method,originalMouseOver,originalClick;
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- jquery=_st(jQuery)._value_(aDOMElement);
- originalMouseOver=_st(aDOMElement)._at_("mouseover");
- originalClick=_st(aDOMElement)._at_("click");
- _st(console)._log_(originalClick);
- _st(aDOMElement)._at_put_("amberOriginalOnMouseOver",originalMouseOver);
- _st(aDOMElement)._at_put_("amberOriginalOnClick",originalClick);
- $1=jquery;
- _st($1)._off_("click");
- $2=_st($1)._off_("mouseover");
- _st(jquery)._mouseover_((function(){
- return smalltalk.withContext(function($ctx2) {
- method=_st(aDOMElement)._at_("amberContext");
- method;
- return _st(console)._log_(_st(_st(_st(_st(method)._methodClass())._name()).__comma(" >> #")).__comma(_st(method)._selector()));
- }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
- _st(jquery)._click_((function(event){
- return smalltalk.withContext(function($ctx2) {
- _st(event)._preventDefault();
- self._inspect_(aDOMElement);
- return false;
- }, function($ctx2) {$ctx2.fillBlock({event:event},$ctx1)})}));
- return self}, function($ctx1) {$ctx1.fill(self,"installCanvasInspectorOn:",{aDOMElement:aDOMElement,jquery:jquery,method:method,originalMouseOver:originalMouseOver,originalClick:originalClick},smalltalk.HTMLCanvasInspector)})},
- args: ["aDOMElement"],
- source: "installCanvasInspectorOn: aDOMElement\x0a\x09| jquery method originalMouseOver originalClick |\x0a\x09\x0a\x09jquery := jQuery value: aDOMElement.\x0a\x09originalMouseOver := aDOMElement at: 'mouseover'.\x0a\x09originalClick := aDOMElement at: 'click'.\x0a\x09\x0a\x09console log: originalClick.\x0a\x09\x0a\x09aDOMElement at: 'amberOriginalOnMouseOver' put: originalMouseOver.\x0a\x09aDOMElement at: 'amberOriginalOnClick' put: originalClick.\x0a\x09\x0a\x09jquery off: 'click'; off: 'mouseover'.\x0a\x09\x0a\x09jquery mouseover: [\x0a\x09\x09method := (aDOMElement at: 'amberContext').\x0a\x09\x09console log: method methodClass name, ' >> #', method selector ].\x0a\x09\x09\x0a\x09jquery click: [ :event |\x0a\x09\x09event preventDefault.\x0a\x09\x09self inspect: aDOMElement.\x0a\x09\x09false ]",
- messageSends: ["value:", "at:", "log:", "at:put:", "off:", "mouseover:", ",", "selector", "name", "methodClass", "click:", "preventDefault", "inspect:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "restore:",
- category: 'as yet unclassified',
- fn: function (aDOMElement){
- var self=this;
- var jquery;
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- jquery=_st(jQuery)._value_(aDOMElement);
- $1=jquery;
- _st($1)._off_("click");
- $2=_st($1)._off_("mouseover");
- _st(jquery)._mouseover_(_st(aDOMElement)._at_("amberOriginalOnMouseOver"));
- _st(jquery)._click_(_st(aDOMElement)._at_("amberOriginalOnClick"));
- _st(console)._log_(_st(aDOMElement)._at_("amberOriginalOnClick"));
- return self}, function($ctx1) {$ctx1.fill(self,"restore:",{aDOMElement:aDOMElement,jquery:jquery},smalltalk.HTMLCanvasInspector)})},
- args: ["aDOMElement"],
- source: "restore: aDOMElement\x0a\x09| jquery |\x0a\x09\x0a\x09jquery := jQuery value: aDOMElement.\x0a\x09jquery off: 'click'; off: 'mouseover'.\x0a\x09\x0a\x09jquery mouseover: (aDOMElement at: 'amberOriginalOnMouseOver').\x0a\x09jquery click: (aDOMElement at: 'amberOriginalOnClick').\x0a\x09\x0a\x09console log: (aDOMElement at: 'amberOriginalOnClick')",
- messageSends: ["value:", "off:", "mouseover:", "at:", "click:", "log:"],
- referencedClasses: []
- }),
- smalltalk.HTMLCanvasInspector);
- smalltalk.addClass('HTMLSnippet', smalltalk.Object, ['snippets'], 'Canvas');
- smalltalk.HTMLSnippet.comment="My sole instance is the registry of html snippets.\x0a`HTMLSnippet current` is the public singleton instance.\x0a\x0aOn startup, it scans the document for any html elements\x0awith `'data-snippet=\x22foo\x22'` attribute and takes them off the document,\x0aremembering them in the store under the specified name.\x0aIt also install method #foo into HTMLCanvas dynamically.\x0a\x0aEvery html snippet should mark a 'caret', a place where contents\x0acan be inserted, by 'data-snippet=\x22*\x22' (a special name for caret).\x0aFor example:\x0a\x0a`<li data-snippet='menuelement' class='...'><a data-snippet='*'></a></li>`\x0a\x0adefines a list element with a link inside; the link itself is marked as a caret.\x0a\x0aYou can later issue\x0a\x0a`html menuelement href: '/foo'; with: 'A foo'`\x0a\x0ato insert the whole snippet and directly manipulate the caret, so it renders:\x0a\x0a`<li class='...'><a href='/foo'>A foo</a></li>`\x0a\x0aFor a self-careting tags (not very useful, but you do not need to fill class etc.\x0ayou can use\x0a\x0a`<div class='lots of classes' attr1='one' attr2='two' data-snippet='*bar'></div>`\x0a\x0aand in code later do:\x0a\x0a`html bar with: [ xxx ]`\x0a\x0ato render\x0a\x0a`<div class='lots of classes' attr1='one' attr2='two'>...added by xxx...</div>`";
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initializeFromJQuery:",
- category: 'initialization',
- fn: function (aJQuery){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._snippetsFromJQuery_(aJQuery))._do_((function(each){
- return smalltalk.withContext(function($ctx2) {
- return self._installSnippetFromJQuery_(_st(each)._asJQuery());
- }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
- return self}, function($ctx1) {$ctx1.fill(self,"initializeFromJQuery:",{aJQuery:aJQuery},smalltalk.HTMLSnippet)})},
- args: ["aJQuery"],
- source: "initializeFromJQuery: aJQuery\x0a\x09\x22Finds and takes out all snippets out of aJQuery.\x0a\x09Installs it into self.\x22\x0a\x09\x0a\x09(self snippetsFromJQuery: aJQuery) do: [ :each |\x0a\x09\x09self installSnippetFromJQuery: each asJQuery ]",
- messageSends: ["do:", "installSnippetFromJQuery:", "asJQuery", "snippetsFromJQuery:"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "installSnippetFromJQuery:",
- category: 'snippet installation',
- fn: function (element){
- var self=this;
- var name;
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- name=_st(element)._attr_("data-snippet");
- $1=_st(name).__eq("*");
- if(! smalltalk.assert($1)){
- $2=_st("^\x5c*"._asRegexp())._test_(name);
- if(smalltalk.assert($2)){
- name=_st(name)._allButFirst();
- name;
- _st(element)._attr_put_("data-snippet","*");
- } else {
- _st(element)._removeAttr_("data-snippet");
- };
- self._snippetAt_install_(name,_st(_st(element)._detach())._get_((0)));
- };
- return self}, function($ctx1) {$ctx1.fill(self,"installSnippetFromJQuery:",{element:element,name:name},smalltalk.HTMLSnippet)})},
- args: ["element"],
- source: "installSnippetFromJQuery: element\x0a\x09| name |\x0a\x09name := element attr: 'data-snippet'.\x0a\x09name = '*' ifFalse: [\x0a\x09\x09('^\x5c*' asRegexp test: name)\x0a\x09\x09\x09ifTrue: [\x0a\x09\x09\x09\x09name := name allButFirst.\x0a\x09\x09\x09\x09element attr: 'data-snippet' put: '*' ]\x0a\x09\x09\x09ifFalse: [\x0a\x09\x09\x09\x09element removeAttr: 'data-snippet' ].\x0a\x09\x09self snippetAt: name install: (element detach get: 0) ]",
- messageSends: ["attr:", "ifFalse:", "ifTrue:ifFalse:", "allButFirst", "attr:put:", "removeAttr:", "test:", "asRegexp", "snippetAt:install:", "get:", "detach", "="],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "snippetAt:",
- category: 'accessing',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(self._snippets())._at_(aString);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"snippetAt:",{aString:aString},smalltalk.HTMLSnippet)})},
- args: ["aString"],
- source: "snippetAt: aString\x0a\x09^ self snippets at: aString",
- messageSends: ["at:", "snippets"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "snippetAt:compile:",
- category: 'method generation',
- fn: function (aString,anElement){
- var self=this;
- function $HTMLCanvas(){return smalltalk.HTMLCanvas||(typeof HTMLCanvas=="undefined"?nil:HTMLCanvas)}
- function $ClassBuilder(){return smalltalk.ClassBuilder||(typeof ClassBuilder=="undefined"?nil:ClassBuilder)}
- return smalltalk.withContext(function($ctx1) {
- _st(_st($ClassBuilder())._new())._installMethod_forClass_category_(_st(_st((function(htmlReceiver){
- return smalltalk.withContext(function($ctx2) {
- return _st(htmlReceiver)._snippet_(anElement);
- }, function($ctx2) {$ctx2.fillBlock({htmlReceiver:htmlReceiver},$ctx1)})}))._currySelf())._asCompiledMethod_(aString),$HTMLCanvas(),"**snippets");
- return self}, function($ctx1) {$ctx1.fill(self,"snippetAt:compile:",{aString:aString,anElement:anElement},smalltalk.HTMLSnippet)})},
- args: ["aString", "anElement"],
- source: "snippetAt: aString compile: anElement\x0a\x09\x22Method generation for the snippet.\x0a\x09The selector is aString, the method block uses anElement\x22\x0a\x09\x0a\x09ClassBuilder new\x0a\x09\x09installMethod: ([ :htmlReceiver | htmlReceiver snippet: anElement ]\x0a\x09\x09\x09currySelf asCompiledMethod: aString)\x0a\x09\x09forClass: HTMLCanvas\x0a\x09\x09category: '**snippets'",
- messageSends: ["installMethod:forClass:category:", "asCompiledMethod:", "currySelf", "snippet:", "new"],
- referencedClasses: ["HTMLCanvas", "ClassBuilder"]
- }),
- smalltalk.HTMLSnippet);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "snippetAt:install:",
- category: 'snippet installation',
- fn: function (aString,anElement){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._snippets())._at_put_(aString,anElement);
- self._snippetAt_compile_(aString,anElement);
- return self}, function($ctx1) {$ctx1.fill(self,"snippetAt:install:",{aString:aString,anElement:anElement},smalltalk.HTMLSnippet)})},
- args: ["aString", "anElement"],
- source: "snippetAt: aString install: anElement\x0a\x09self snippets at: aString put: anElement.\x0a\x09self snippetAt: aString compile: anElement",
- messageSends: ["at:put:", "snippets", "snippetAt:compile:"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "snippets",
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$1;
- $2=self["@snippets"];
- if(($receiver = $2) == nil || $receiver == undefined){
- self["@snippets"]=smalltalk.HashedCollection._from_([]);
- $1=self["@snippets"];
- } else {
- $1=$2;
- };
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"snippets",{},smalltalk.HTMLSnippet)})},
- args: [],
- source: "snippets\x0a\x09^snippets ifNil: [ snippets := #{} ]",
- messageSends: ["ifNil:"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "snippetsFromJQuery:",
- category: 'private',
- fn: function (aJQuery){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(aJQuery)._find_("[data-snippet]"))._toArray();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"snippetsFromJQuery:",{aJQuery:aJQuery},smalltalk.HTMLSnippet)})},
- args: ["aJQuery"],
- source: "snippetsFromJQuery: aJQuery\x0a\x09^ (aJQuery find: '[data-snippet]') toArray",
- messageSends: ["toArray", "find:"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet);
- smalltalk.HTMLSnippet.klass.iVarNames = ['current'];
- smalltalk.addMethod(
- smalltalk.method({
- selector: "current",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@current"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"current",{},smalltalk.HTMLSnippet.klass)})},
- args: [],
- source: "current\x0a\x09^ current",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "ensureCurrent",
- category: 'initialization',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1,$2,$3;
- $1=self["@current"];
- if(($receiver = $1) == nil || $receiver == undefined){
- $2=smalltalk.Object.klass.fn.prototype._new.apply(_st(self), []);
- _st($2)._initializeFromJQuery_(_st(document)._asJQuery());
- $3=_st($2)._yourself();
- self["@current"]=$3;
- self["@current"];
- } else {
- $1;
- };
- return self}, function($ctx1) {$ctx1.fill(self,"ensureCurrent",{},smalltalk.HTMLSnippet.klass)})},
- args: [],
- source: "ensureCurrent\x0a\x09current ifNil: [\x0a\x09\x09current := super new\x0a\x09\x09\x09initializeFromJQuery: document asJQuery;\x0a\x09\x09\x09yourself ]",
- messageSends: ["ifNil:", "initializeFromJQuery:", "asJQuery", "new", "yourself"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initialize",
- category: 'initialization',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- smalltalk.Object.klass.fn.prototype._initialize.apply(_st(self), []);
- $1=self._isDOMAvailable();
- if(smalltalk.assert($1)){
- self._ensureCurrent();
- };
- return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.HTMLSnippet.klass)})},
- args: [],
- source: "initialize\x0a\x09super initialize.\x0a\x09self isDOMAvailable ifTrue: [\x0a\x09\x09self ensureCurrent ]",
- messageSends: ["initialize", "ifTrue:", "ensureCurrent", "isDOMAvailable"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isDOMAvailable",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return typeof document !== 'undefined' ;
- return self}, function($ctx1) {$ctx1.fill(self,"isDOMAvailable",{},smalltalk.HTMLSnippet.klass)})},
- args: [],
- source: "isDOMAvailable\x0a\x09< return typeof document !== 'undefined' >",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "new",
- category: 'instance creation',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._shouldNotImplement();
- return self}, function($ctx1) {$ctx1.fill(self,"new",{},smalltalk.HTMLSnippet.klass)})},
- args: [],
- source: "new\x0a\x09self shouldNotImplement",
- messageSends: ["shouldNotImplement"],
- referencedClasses: []
- }),
- smalltalk.HTMLSnippet.klass);
- smalltalk.addClass('TagBrush', smalltalk.Object, ['canvas', 'element'], 'Canvas');
- smalltalk.TagBrush.comment="I am a brush for building a single DOM element (which I hold onto).\x0a\x0aAll tags but `<style>` are instances of me (see the `StyleBrush` class).\x0a\x0a## API\x0a\x0a1. Nesting\x0a\x0a Use `#with:` to nest tags. `#with:` can take aString, `TagBrush` instance, a `Widget` or block closure as parameter.\x0a\x0a Example: `aTag with: aString with: aCanvas div`\x0a\x0a2. Events\x0a\x0a The `events` protocol contains all methods related to events (delegating event handling to jQuery).\x0a\x0a Example: `aTag onClick: [ window alert: 'clicked' ]`\x0a\x0a3. Attributes\x0a\x0a The `attribute` protocol contains methods for attribute manipulation (delegating to jQuery too).\x0a\x0a Example: `aTag at: 'value' put: 'hello world'`\x0a\x0a4. Raw access and jQuery\x0a\x0a The `#element` method can be used to access to JavaScript DOM element object.\x0a\x0a Example: `aTag element cssStyle`\x0a\x0a Use `#asJQuery` to access to the receiver converted into a jQuery object.\x0a\x0a Example: `aTag asJQuery css: 'color' value: 'red'`";
- smalltalk.addMethod(
- smalltalk.method({
- selector: "accesskey:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("accesskey",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"accesskey:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "accesskey: aString\x0a\x09self at: 'accesskey' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "action:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("action",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"action:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "action: aString\x0a\x09self at: 'action' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "addBrush:",
- category: 'adding',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- self._appendChild_(_st(aTagBrush)._element());
- $1=aTagBrush;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"addBrush:",{aTagBrush:aTagBrush},smalltalk.TagBrush)})},
- args: ["aTagBrush"],
- source: "addBrush: aTagBrush\x0a\x09self appendChild: aTagBrush element.\x0a\x09^aTagBrush",
- messageSends: ["appendChild:", "element"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "align:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("align",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"align:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "align: aString\x0a\x09self at: 'align' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "alt:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("alt",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"alt:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "alt: aString\x0a\x09self at: 'alt' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "append:",
- category: 'adding',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(anObject)._appendToBrush_(self);
- return self}, function($ctx1) {$ctx1.fill(self,"append:",{anObject:anObject},smalltalk.TagBrush)})},
- args: ["anObject"],
- source: "append: anObject\x0a\x09anObject appendToBrush: self",
- messageSends: ["appendToBrush:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendBlock:",
- category: 'adding',
- fn: function (aBlock){
- var self=this;
- var root;
- return smalltalk.withContext(function($ctx1) {
- root=_st(self["@canvas"])._root();
- _st(self["@canvas"])._root_(self);
- _st(aBlock)._value_(self["@canvas"]);
- _st(self["@canvas"])._root_(root);
- return self}, function($ctx1) {$ctx1.fill(self,"appendBlock:",{aBlock:aBlock,root:root},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "appendBlock: aBlock\x0a\x09| root |\x0a\x09root := canvas root.\x0a\x09canvas root: self.\x0a\x09aBlock value: canvas.\x0a\x09canvas root: root",
- messageSends: ["root", "root:", "value:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendChild:",
- category: 'adding',
- fn: function (anElement){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var element=self['@element'];
- if (null == element.canHaveChildren || element.canHaveChildren) {
- element.appendChild(anElement);
- } else {
- element.text = String(element.text) + anElement.innerHTML;
- } ;
- return self}, function($ctx1) {$ctx1.fill(self,"appendChild:",{anElement:anElement},smalltalk.TagBrush)})},
- args: ["anElement"],
- source: "appendChild: anElement\x0a\x09\x22In IE7 and IE8 appendChild fails on several node types. So we need to check\x22\x0a\x09<var element=self['@element'];\x0a\x09if (null == element.canHaveChildren || element.canHaveChildren) {\x0a\x09\x09element.appendChild(anElement);\x0a\x09} else {\x0a\x09\x09element.text = String(element.text) + anElement.innerHTML;\x0a\x09} >",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendString:",
- category: 'adding',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._appendChild_(self._createTextNodeFor_(aString));
- return self}, function($ctx1) {$ctx1.fill(self,"appendString:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "appendString: aString\x0a\x09self appendChild: (self createTextNodeFor: aString)",
- messageSends: ["appendChild:", "createTextNodeFor:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToBrush:",
- category: 'adding',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(aTagBrush)._addBrush_(self);
- return self}, function($ctx1) {$ctx1.fill(self,"appendToBrush:",{aTagBrush:aTagBrush},smalltalk.TagBrush)})},
- args: ["aTagBrush"],
- source: "appendToBrush: aTagBrush\x0a\x09aTagBrush addBrush: self",
- messageSends: ["addBrush:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "asJQuery",
- category: 'converting',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(window)._jQuery_(self._element());
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"asJQuery",{},smalltalk.TagBrush)})},
- args: [],
- source: "asJQuery\x0a\x09^window jQuery: self element",
- messageSends: ["jQuery:", "element"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "at:put:",
- category: 'attributes',
- fn: function (aString,aValue){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self['@element'].setAttribute(aString, aValue);
- return self}, function($ctx1) {$ctx1.fill(self,"at:put:",{aString:aString,aValue:aValue},smalltalk.TagBrush)})},
- args: ["aString", "aValue"],
- source: "at: aString put: aValue\x0a\x09<self['@element'].setAttribute(aString, aValue)>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "class:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self['@element'].className = aString;
- return self}, function($ctx1) {$ctx1.fill(self,"class:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "class: aString\x0a\x09<self['@element'].className = aString>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "cols:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("cols",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"cols:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "cols: aString\x0a\x09self at: 'cols' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "contenteditable:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("contenteditable",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"contenteditable:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "contenteditable: aString\x0a\x09self at: 'contenteditable' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "contents:",
- category: 'adding',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- $1=self;
- _st($1)._empty();
- $2=_st($1)._append_(anObject);
- return self}, function($ctx1) {$ctx1.fill(self,"contents:",{anObject:anObject},smalltalk.TagBrush)})},
- args: ["anObject"],
- source: "contents: anObject\x0a\x09self\x0a\x09empty;\x0a\x09append: anObject",
- messageSends: ["empty", "append:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "contextmenu:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("contextmenu",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"contextmenu:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "contextmenu: aString\x0a\x09self at: 'contextmenu' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "createElementFor:",
- category: 'private',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return document.createElement(String(aString));
- return self}, function($ctx1) {$ctx1.fill(self,"createElementFor:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "createElementFor: aString\x0a\x09<return document.createElement(String(aString))>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "createTextNodeFor:",
- category: 'private',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return document.createTextNode(String(aString));
- return self}, function($ctx1) {$ctx1.fill(self,"createTextNodeFor:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "createTextNodeFor: aString\x0a\x09<return document.createTextNode(String(aString))>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "draggable:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("draggable",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"draggable:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "draggable: aString\x0a\x09self at: 'draggable' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "element",
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@element"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"element",{},smalltalk.TagBrush)})},
- args: [],
- source: "element\x0a\x09^element",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "empty",
- category: 'adding',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._empty();
- return self}, function($ctx1) {$ctx1.fill(self,"empty",{},smalltalk.TagBrush)})},
- args: [],
- source: "empty\x0a\x09self asJQuery empty",
- messageSends: ["empty", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "for:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("for",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"for:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "for: aString\x0a\x09self at: 'for' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "height:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("height",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"height:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "height: aString\x0a\x09self at: 'height' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "hidden",
- category: 'attributes',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("hidden","hidden");
- return self}, function($ctx1) {$ctx1.fill(self,"hidden",{},smalltalk.TagBrush)})},
- args: [],
- source: "hidden\x0a\x09self at: 'hidden' put: 'hidden'",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "href:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("href",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"href:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "href: aString\x0a\x09self at: 'href' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "id:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("id",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"id:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "id: aString\x0a\x09self at: 'id' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initializeFromJQuery:canvas:",
- category: 'initialization',
- fn: function (aJQuery,aCanvas){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@element"]=_st(aJQuery)._get_((0));
- self["@canvas"]=aCanvas;
- return self}, function($ctx1) {$ctx1.fill(self,"initializeFromJQuery:canvas:",{aJQuery:aJQuery,aCanvas:aCanvas},smalltalk.TagBrush)})},
- args: ["aJQuery", "aCanvas"],
- source: "initializeFromJQuery: aJQuery canvas: aCanvas\x0a\x09element := aJQuery get: 0.\x0a\x09canvas := aCanvas",
- messageSends: ["get:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initializeFromString:canvas:",
- category: 'initialization',
- fn: function (aString,aCanvas){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@element"]=self._createElementFor_(aString);
- self["@canvas"]=aCanvas;
- return self}, function($ctx1) {$ctx1.fill(self,"initializeFromString:canvas:",{aString:aString,aCanvas:aCanvas},smalltalk.TagBrush)})},
- args: ["aString", "aCanvas"],
- source: "initializeFromString: aString canvas: aCanvas\x0a\x09element := self createElementFor: aString.\x0a\x09canvas := aCanvas",
- messageSends: ["createElementFor:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "media:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("media",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"media:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "media: aString\x0a\x09self at: 'media' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "method:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("method",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"method:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "method: aString\x0a\x09self at: 'method' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "name:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("name",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"name:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "name: aString\x0a\x09self at: 'name' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onBlur:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("blur",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onBlur:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onBlur: aBlock\x0a\x09self asJQuery bind: 'blur' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onChange:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("change",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onChange:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onChange: aBlock\x0a\x09self asJQuery bind: 'change' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onClick:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("click",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onClick:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onClick: aBlock\x0a\x09self asJQuery bind: 'click' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onDblClick:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("dblclick",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onDblClick:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onDblClick: aBlock\x0a\x09self asJQuery bind: 'dblclick' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onFocus:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("focus",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onFocus:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onFocus: aBlock\x0a\x09self asJQuery bind: 'focus' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onFocusIn:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("focusin",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onFocusIn:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onFocusIn: aBlock\x0a\x09self asJQuery bind: 'focusin' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onFocusOut:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("focusout",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onFocusOut:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onFocusOut: aBlock\x0a\x09self asJQuery bind: 'focusout' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onHover:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("hover",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onHover:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onHover: aBlock\x0a\x09self asJQuery bind: 'hover' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onKeyDown:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("keydown",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onKeyDown:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onKeyDown: aBlock\x0a\x09self asJQuery bind: 'keydown' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onKeyPress:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("keypress",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onKeyPress:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onKeyPress: aBlock\x0a\x09self asJQuery bind: 'keypress' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onKeyUp:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("keyup",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onKeyUp:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onKeyUp: aBlock\x0a\x09self asJQuery bind: 'keyup' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseDown:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mousedown",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseDown:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseDown: aBlock\x0a\x09self asJQuery bind: 'mousedown' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseEnter:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mouseenter",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseEnter:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseEnter: aBlock\x0a\x09self asJQuery bind: 'mouseenter' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseLeave:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mouseleave",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseLeave:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseLeave: aBlock\x0a\x09self asJQuery bind: 'mouseleave' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseMove:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mousemove",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseMove:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseMove: aBlock\x0a\x09self asJQuery bind: 'mousemove' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseOut:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mouseout",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseOut:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseOut: aBlock\x0a\x09self asJQuery bind: 'mouseout' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseOver:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mouseover",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseOver:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseOver: aBlock\x0a\x09self asJQuery bind: 'mouseover' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onMouseUp:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("mouseup",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onMouseUp:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onMouseUp: aBlock\x0a\x09self asJQuery bind: 'mouseup' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onSelect:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("select",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onSelect:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onSelect: aBlock\x0a\x09self asJQuery bind: 'select' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onSubmit:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("submit",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onSubmit:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onSubmit: aBlock\x0a\x09self asJQuery bind: 'submit' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "onUnload:",
- category: 'events',
- fn: function (aBlock){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self._asJQuery())._bind_do_("unload",aBlock);
- return self}, function($ctx1) {$ctx1.fill(self,"onUnload:",{aBlock:aBlock},smalltalk.TagBrush)})},
- args: ["aBlock"],
- source: "onUnload: aBlock\x0a\x09self asJQuery bind: 'unload' do: aBlock",
- messageSends: ["bind:do:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "placeholder:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("placeholder",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"placeholder:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "placeholder: aString\x0a\x09self at: 'placeholder' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "rel:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("rel",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"rel:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "rel: aString\x0a\x09self at: 'rel' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "removeAt:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self['@element'].removeAttribute(aString);
- return self}, function($ctx1) {$ctx1.fill(self,"removeAt:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "removeAt: aString\x0a\x09<self['@element'].removeAttribute(aString)>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "rows:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("rows",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"rows:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "rows: aString\x0a\x09self at: 'rows' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "src:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("src",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"src:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "src: aString\x0a\x09self at: 'src' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "style:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("style",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"style:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "style: aString\x0a\x09self at: 'style' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "tabindex:",
- category: 'attributes',
- fn: function (aNumber){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("tabindex",aNumber);
- return self}, function($ctx1) {$ctx1.fill(self,"tabindex:",{aNumber:aNumber},smalltalk.TagBrush)})},
- args: ["aNumber"],
- source: "tabindex: aNumber\x0a\x09self at: 'tabindex' put: aNumber",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "target:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("target",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"target:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "target: aString\x0a\x09self at: 'target' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "title:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("title",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"title:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "title: aString\x0a\x09self at: 'title' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "type:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("type",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"type:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "type: aString\x0a\x09self at: 'type' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "valign:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("valign",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"valign:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "valign: aString\x0a\x09self at: 'valign' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "value:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("value",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"value:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "value: aString\x0a\x09self at: 'value' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "width:",
- category: 'attributes',
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._at_put_("width",aString);
- return self}, function($ctx1) {$ctx1.fill(self,"width:",{aString:aString},smalltalk.TagBrush)})},
- args: ["aString"],
- source: "width: aString\x0a\x09self at: 'width' put: aString",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "with:",
- category: 'adding',
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._append_(anObject);
- return self}, function($ctx1) {$ctx1.fill(self,"with:",{anObject:anObject},smalltalk.TagBrush)})},
- args: ["anObject"],
- source: "with: anObject\x0a\x09self append: anObject",
- messageSends: ["append:"],
- referencedClasses: []
- }),
- smalltalk.TagBrush);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "fromJQuery:canvas:",
- category: 'instance creation',
- fn: function (aJQuery,aCanvas){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=self._new();
- _st($2)._initializeFromJQuery_canvas_(aJQuery,aCanvas);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"fromJQuery:canvas:",{aJQuery:aJQuery,aCanvas:aCanvas},smalltalk.TagBrush.klass)})},
- args: ["aJQuery", "aCanvas"],
- source: "fromJQuery: aJQuery canvas: aCanvas\x0a\x09^self new\x0a\x09initializeFromJQuery: aJQuery canvas: aCanvas;\x0a\x09yourself",
- messageSends: ["initializeFromJQuery:canvas:", "new", "yourself"],
- referencedClasses: []
- }),
- smalltalk.TagBrush.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "fromString:canvas:",
- category: 'instance creation',
- fn: function (aString,aCanvas){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=self._new();
- _st($2)._initializeFromString_canvas_(aString,aCanvas);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"fromString:canvas:",{aString:aString,aCanvas:aCanvas},smalltalk.TagBrush.klass)})},
- args: ["aString", "aCanvas"],
- source: "fromString: aString canvas: aCanvas\x0a\x09^self new\x0a\x09initializeFromString: aString canvas: aCanvas;\x0a\x09yourself",
- messageSends: ["initializeFromString:canvas:", "new", "yourself"],
- referencedClasses: []
- }),
- smalltalk.TagBrush.klass);
- smalltalk.addClass('StyleTag', smalltalk.TagBrush, ['canvas', 'element'], 'Canvas');
- smalltalk.StyleTag.comment="I'm a `<style>` tag use to inline CSS or load a stylesheet.\x0a\x0a## Motivation\x0a\x0aThe need for a specific class comes from Internet Explorer compatibility issues.";
- smalltalk.addMethod(
- smalltalk.method({
- selector: "with:",
- category: 'adding',
- fn: function (aString){
- var self=this;
- function $HTMLCanvas(){return smalltalk.HTMLCanvas||(typeof HTMLCanvas=="undefined"?nil:HTMLCanvas)}
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st($HTMLCanvas())._isMSIE();
- if(smalltalk.assert($1)){
- _st(_st(self._element())._styleSheet())._cssText_(aString);
- } else {
- smalltalk.TagBrush.fn.prototype._with_.apply(_st(self), [aString]);
- };
- return self}, function($ctx1) {$ctx1.fill(self,"with:",{aString:aString},smalltalk.StyleTag)})},
- args: ["aString"],
- source: "with: aString\x0a\x09HTMLCanvas isMSIE\x0a\x09\x09ifTrue: [self element styleSheet cssText: aString ]\x0a\x09\x09ifFalse: [super with: aString ].",
- messageSends: ["ifTrue:ifFalse:", "cssText:", "styleSheet", "element", "with:", "isMSIE"],
- referencedClasses: ["HTMLCanvas"]
- }),
- smalltalk.StyleTag);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "canvas:",
- category: 'instance creation',
- fn: function (aCanvas){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=self._new();
- _st($2)._initializeFromString_canvas_("style",aCanvas);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"canvas:",{aCanvas:aCanvas},smalltalk.StyleTag.klass)})},
- args: ["aCanvas"],
- source: "canvas: aCanvas\x0a\x09^self new\x0a\x09initializeFromString: 'style' canvas: aCanvas;\x0a\x09yourself",
- messageSends: ["initializeFromString:canvas:", "new", "yourself"],
- referencedClasses: []
- }),
- smalltalk.StyleTag.klass);
- smalltalk.addClass('Widget', smalltalk.Object, [], 'Canvas');
- smalltalk.Widget.comment="I am a presenter building HTML. Subclasses are typically reusable components.\x0a\x0a## API\x0a\x0aUse `#renderContentOn:` to build HTML. (See `HTMLCanvas` and `TagBrush` classes for more about building HTML).\x0a\x0aTo add a widget to the page, the convenience method `#appendToJQuery:` is very useful.\x0a\x0aExemple: \x0a\x0a Counter new appendToJQuery: 'body' asJQuery";
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToBrush:",
- category: 'adding',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self._appendToJQuery_(_st(aTagBrush)._asJQuery());
- return self}, function($ctx1) {$ctx1.fill(self,"appendToBrush:",{aTagBrush:aTagBrush},smalltalk.Widget)})},
- args: ["aTagBrush"],
- source: "appendToBrush: aTagBrush\x0a\x09self appendToJQuery: aTagBrush asJQuery",
- messageSends: ["appendToJQuery:", "asJQuery"],
- referencedClasses: []
- }),
- smalltalk.Widget);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToJQuery:",
- category: 'adding',
- fn: function (aJQuery){
- var self=this;
- function $HTMLCanvas(){return smalltalk.HTMLCanvas||(typeof HTMLCanvas=="undefined"?nil:HTMLCanvas)}
- return smalltalk.withContext(function($ctx1) {
- self._renderOn_(_st($HTMLCanvas())._onJQuery_(aJQuery));
- return self}, function($ctx1) {$ctx1.fill(self,"appendToJQuery:",{aJQuery:aJQuery},smalltalk.Widget)})},
- args: ["aJQuery"],
- source: "appendToJQuery: aJQuery\x0a\x09self renderOn: (HTMLCanvas onJQuery: aJQuery)",
- messageSends: ["renderOn:", "onJQuery:"],
- referencedClasses: ["HTMLCanvas"]
- }),
- smalltalk.Widget);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "renderOn:",
- category: 'rendering',
- fn: function (html){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return self}, function($ctx1) {$ctx1.fill(self,"renderOn:",{html:html},smalltalk.Widget)})},
- args: ["html"],
- source: "renderOn: html\x0a\x09self",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Widget);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "heliosClass",
- category: 'helios',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "widget";
- }, function($ctx1) {$ctx1.fill(self,"heliosClass",{},smalltalk.Widget.klass)})},
- args: [],
- source: "heliosClass\x0a\x09^ 'widget'",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Widget.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToBrush:",
- category: '*Canvas',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(aTagBrush)._append_(self._asString());
- return self}, function($ctx1) {$ctx1.fill(self,"appendToBrush:",{aTagBrush:aTagBrush},smalltalk.Object)})},
- args: ["aTagBrush"],
- source: "appendToBrush: aTagBrush\x0a\x09aTagBrush append: self asString",
- messageSends: ["append:", "asString"],
- referencedClasses: []
- }),
- smalltalk.Object);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToJQuery:",
- category: '*Canvas',
- fn: function (aJQuery){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(aJQuery)._append_(self._asString());
- return self}, function($ctx1) {$ctx1.fill(self,"appendToJQuery:",{aJQuery:aJQuery},smalltalk.Object)})},
- args: ["aJQuery"],
- source: "appendToJQuery: aJQuery\x0a\x09aJQuery append: self asString",
- messageSends: ["append:", "asString"],
- referencedClasses: []
- }),
- smalltalk.Object);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToBrush:",
- category: '*Canvas',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(aTagBrush)._appendBlock_(self);
- return self}, function($ctx1) {$ctx1.fill(self,"appendToBrush:",{aTagBrush:aTagBrush},smalltalk.BlockClosure)})},
- args: ["aTagBrush"],
- source: "appendToBrush: aTagBrush\x0a\x09aTagBrush appendBlock: self",
- messageSends: ["appendBlock:"],
- referencedClasses: []
- }),
- smalltalk.BlockClosure);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToJQuery:",
- category: '*Canvas',
- fn: function (aJQuery){
- var self=this;
- function $HTMLCanvas(){return smalltalk.HTMLCanvas||(typeof HTMLCanvas=="undefined"?nil:HTMLCanvas)}
- return smalltalk.withContext(function($ctx1) {
- self._value_(_st($HTMLCanvas())._onJQuery_(aJQuery));
- return self}, function($ctx1) {$ctx1.fill(self,"appendToJQuery:",{aJQuery:aJQuery},smalltalk.BlockClosure)})},
- args: ["aJQuery"],
- source: "appendToJQuery: aJQuery\x0a\x09self value: (HTMLCanvas onJQuery: aJQuery)",
- messageSends: ["value:", "onJQuery:"],
- referencedClasses: ["HTMLCanvas"]
- }),
- smalltalk.BlockClosure);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "asSnippet",
- category: '*Canvas',
- fn: function (){
- var self=this;
- function $HTMLSnippet(){return smalltalk.HTMLSnippet||(typeof HTMLSnippet=="undefined"?nil:HTMLSnippet)}
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st($HTMLSnippet())._current())._snippetAt_(self._asString());
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"asSnippet",{},smalltalk.CharacterArray)})},
- args: [],
- source: "asSnippet\x0a\x09^ HTMLSnippet current snippetAt: self asString",
- messageSends: ["snippetAt:", "asString", "current"],
- referencedClasses: ["HTMLSnippet"]
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToBrush:",
- category: '*Canvas',
- fn: function (aTagBrush){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(aTagBrush)._appendString_(self);
- return self}, function($ctx1) {$ctx1.fill(self,"appendToBrush:",{aTagBrush:aTagBrush},smalltalk.String)})},
- args: ["aTagBrush"],
- source: "appendToBrush: aTagBrush\x0a\x09aTagBrush appendString: self",
- messageSends: ["appendString:"],
- referencedClasses: []
- }),
- smalltalk.String);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "appendToJQuery:",
- category: '*Canvas',
- fn: function (aJQuery){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(aJQuery)._append_(self);
- return self}, function($ctx1) {$ctx1.fill(self,"appendToJQuery:",{aJQuery:aJQuery},smalltalk.String)})},
- args: ["aJQuery"],
- source: "appendToJQuery: aJQuery\x0a\x09aJQuery append: self",
- messageSends: ["append:"],
- referencedClasses: []
- }),
- smalltalk.String);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "asJQuery",
- category: '*Canvas',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return jQuery(String(self));
- return self}, function($ctx1) {$ctx1.fill(self,"asJQuery",{},smalltalk.String)})},
- args: [],
- source: "asJQuery\x0a\x09<return jQuery(String(self))>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.String);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "asJQuery",
- category: '*Canvas',
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return jQuery(self['@jsObject']);
- return self}, function($ctx1) {$ctx1.fill(self,"asJQuery",{},smalltalk.JSObjectProxy)})},
- args: [],
- source: "asJQuery\x0a\x09<return jQuery(self['@jsObject'])>",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.JSObjectProxy);
|