1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330 |
- smalltalk.addPackage('Helios-Commands-Tools');
- smalltalk.addClass('HLToolCommand', smalltalk.HLModelCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return nil;
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLToolCommand)})},
- messageSends: []}),
- smalltalk.HLToolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "for:",
- fn: function (aToolModel){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=_st(self)._new();
- _st($2)._model_(aToolModel);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"for:",{aToolModel:aToolModel},smalltalk.HLToolCommand.klass)})},
- messageSends: ["model:", "new", "yourself"]}),
- smalltalk.HLToolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isValidFor:",
- fn: function (aModel){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(aModel)._isToolModel();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{aModel:aModel},smalltalk.HLToolCommand.klass)})},
- messageSends: ["isToolModel"]}),
- smalltalk.HLToolCommand.klass);
- smalltalk.addClass('HLCommitPackageCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Packages";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCommitPackageCommand)})},
- messageSends: []}),
- smalltalk.HLCommitPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._commitPackage();
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCommitPackageCommand)})},
- messageSends: ["commitPackage", "model"]}),
- smalltalk.HLCommitPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCommitPackageCommand)})},
- messageSends: []}),
- smalltalk.HLCommitPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "k";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCommitPackageCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCommitPackageCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Commit";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCommitPackageCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCommitPackageCommand.klass);
- smalltalk.addClass('HLCopyCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCopyCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Copy";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCopyCommand.klass);
- smalltalk.addClass('HLCopyClassCommand', smalltalk.HLCopyCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Classes";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCopyClassCommand)})},
- messageSends: []}),
- smalltalk.HLCopyClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "defaultInput",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedClass())._name();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLCopyClassCommand)})},
- messageSends: ["name", "selectedClass", "model"]}),
- smalltalk.HLCopyClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "New class name:";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLCopyClassCommand)})},
- messageSends: []}),
- smalltalk.HLCopyClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._copyClassTo_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCopyClassCommand)})},
- messageSends: ["copyClassTo:", "input", "model"]}),
- smalltalk.HLCopyClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCopyClassCommand)})},
- messageSends: ["notNil", "selectedClass", "model"]}),
- smalltalk.HLCopyClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLCopyClassCommand)})},
- messageSends: []}),
- smalltalk.HLCopyClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCopyClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Class";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCopyClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Copy class...";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLCopyClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLCopyClassCommand.klass);
- smalltalk.addClass('HLFindCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "f";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindCommand.klass)})},
- messageSends: []}),
- smalltalk.HLFindCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Find";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindCommand.klass)})},
- messageSends: []}),
- smalltalk.HLFindCommand.klass);
- smalltalk.addClass('HLFindClassCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "select a class";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindClassCommand)})},
- messageSends: []}),
- smalltalk.HLFindClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._openClassNamed_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindClassCommand)})},
- messageSends: ["openClassNamed:", "input", "model"]}),
- smalltalk.HLFindClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputCompletion",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._model())._availableClassNames();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindClassCommand)})},
- messageSends: ["availableClassNames", "model"]}),
- smalltalk.HLFindClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Find a class";
- }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindClassCommand)})},
- messageSends: []}),
- smalltalk.HLFindClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindClassCommand)})},
- messageSends: []}),
- smalltalk.HLFindClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLFindClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Class";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLFindClassCommand.klass);
- smalltalk.addClass('HLFindReferencesCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "defaultInput",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=_st(_st(self)._model())._selectedMethod();
- if(($receiver = $2) == nil || $receiver == undefined){
- $3=_st(_st(self)._model())._selectedClass();
- if(($receiver = $3) == nil || $receiver == undefined){
- $1="";
- } else {
- var class_;
- class_=$receiver;
- $1=_st(class_)._name();
- };
- } else {
- var method;
- method=$receiver;
- $1=_st(method)._selector();
- };
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLFindReferencesCommand)})},
- messageSends: ["ifNil:ifNotNil:", "name", "selectedClass", "model", "selector", "selectedMethod"]}),
- smalltalk.HLFindReferencesCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "find references";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindReferencesCommand)})},
- messageSends: []}),
- smalltalk.HLFindReferencesCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- function $HLReferences(){return smalltalk.HLReferences||(typeof HLReferences=="undefined"?nil:HLReferences)}
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- $1=_st($HLReferences())._new();
- _st($1)._open();
- $2=_st($1)._search_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindReferencesCommand)})},
- messageSends: ["open", "new", "search:", "input"]}),
- smalltalk.HLFindReferencesCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputCompletion",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._availableClassNames()).__comma(_st(_st(self)._model())._allSelectors());
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindReferencesCommand)})},
- messageSends: [",", "allSelectors", "model", "availableClassNames"]}),
- smalltalk.HLFindReferencesCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Find references of";
- }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindReferencesCommand)})},
- messageSends: []}),
- smalltalk.HLFindReferencesCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindReferencesCommand)})},
- messageSends: []}),
- smalltalk.HLFindReferencesCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "r";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindReferencesCommand.klass)})},
- messageSends: []}),
- smalltalk.HLFindReferencesCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "References";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindReferencesCommand.klass)})},
- messageSends: []}),
- smalltalk.HLFindReferencesCommand.klass);
- smalltalk.addClass('HLMoveToCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "m";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveToCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveToCommand.klass);
- smalltalk.addClass('HLMoveClassToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveClassToCommand)})},
- messageSends: ["notNil", "selectedClass", "model"]}),
- smalltalk.HLMoveClassToCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveClassToCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Class";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveClassToCommand.klass);
- smalltalk.addClass('HLMoveClassToPackageCommand', smalltalk.HLMoveClassToCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Classes";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveClassToPackageCommand)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "select a package";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveClassToPackageCommand)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._moveClassToPackage_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveClassToPackageCommand)})},
- messageSends: ["moveClassToPackage:", "input", "model"]}),
- smalltalk.HLMoveClassToPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputCompletion",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._model())._availablePackageNames();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveClassToPackageCommand)})},
- messageSends: ["availablePackageNames", "model"]}),
- smalltalk.HLMoveClassToPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move class to package:";
- }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveClassToPackageCommand)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveClassToPackageCommand)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "p";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "to package";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move to package...";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveClassToPackageCommand.klass);
- smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Methods";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveMethodToCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
- messageSends: ["notNil", "selectedMethod", "model"]}),
- smalltalk.HLMoveMethodToCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "m";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Method";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToCommand.klass);
- smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "select a class";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._moveMethodToClass_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
- messageSends: ["moveMethodToClass:", "input", "model"]}),
- smalltalk.HLMoveMethodToClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputCompletion",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._model())._availableClassNames();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToClassCommand)})},
- messageSends: ["availableClassNames", "model"]}),
- smalltalk.HLMoveMethodToClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move method to class:";
- }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "to class";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move to class...";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToClassCommand.klass);
- smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "select a protocol";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._moveMethodToProtocol_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
- messageSends: ["moveMethodToProtocol:", "input", "model"]}),
- smalltalk.HLMoveMethodToProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputCompletion",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._model())._availableProtocols();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToProtocolCommand)})},
- messageSends: ["availableProtocols", "model"]}),
- smalltalk.HLMoveMethodToProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "inputLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move method to a protocol:";
- }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "t";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToProtocolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "to protocol";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToProtocolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Move to protocol...";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLMoveMethodToProtocolCommand.klass);
- smalltalk.addClass('HLRemoveCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "x";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Remove";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveCommand.klass);
- smalltalk.addClass('HLRemoveClassCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Classes";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveClassCommand)})},
- messageSends: []}),
- smalltalk.HLRemoveClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._removeClass();
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveClassCommand)})},
- messageSends: ["removeClass", "model"]}),
- smalltalk.HLRemoveClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveClassCommand)})},
- messageSends: ["notNil", "selectedClass", "model"]}),
- smalltalk.HLRemoveClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Class";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Remove class";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveClassCommand.klass);
- smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Methods";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveMethodCommand)})},
- messageSends: []}),
- smalltalk.HLRemoveMethodCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._removeMethod();
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveMethodCommand)})},
- messageSends: ["removeMethod", "model"]}),
- smalltalk.HLRemoveMethodCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveMethodCommand)})},
- messageSends: ["notNil", "selectedMethod", "model"]}),
- smalltalk.HLRemoveMethodCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "m";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveMethodCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Method";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveMethodCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Remove method";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveMethodCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveMethodCommand.klass);
- smalltalk.addClass('HLRemoveProtocolCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Protocols";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLRemoveProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._removeProtocol();
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveProtocolCommand)})},
- messageSends: ["removeProtocol", "model"]}),
- smalltalk.HLRemoveProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveProtocolCommand)})},
- messageSends: ["notNil", "selectedProtocol", "model"]}),
- smalltalk.HLRemoveProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "t";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveProtocolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Protocol";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveProtocolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Remove protocol";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRemoveProtocolCommand.klass);
- smalltalk.addClass('HLRenameCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "r";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Rename";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameCommand.klass);
- smalltalk.addClass('HLRenameClassCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Classes";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameClassCommand)})},
- messageSends: []}),
- smalltalk.HLRenameClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "defaultInput",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedClass())._name();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameClassCommand)})},
- messageSends: ["name", "selectedClass", "model"]}),
- smalltalk.HLRenameClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Rename class to:";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameClassCommand)})},
- messageSends: []}),
- smalltalk.HLRenameClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._renameClassTo_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameClassCommand)})},
- messageSends: ["renameClassTo:", "input", "model"]}),
- smalltalk.HLRenameClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameClassCommand)})},
- messageSends: ["notNil", "selectedClass", "model"]}),
- smalltalk.HLRenameClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameClassCommand)})},
- messageSends: []}),
- smalltalk.HLRenameClassCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "c";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Class";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameClassCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Rename class...";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameClassCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameClassCommand.klass);
- smalltalk.addClass('HLRenameProtocolCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Tools');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "category",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Protocols";
- }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLRenameProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "defaultInput",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._model())._selectedProtocol();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameProtocolCommand)})},
- messageSends: ["selectedProtocol", "model"]}),
- smalltalk.HLRenameProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "displayLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Rename protocol to:";
- }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLRenameProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "execute",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(_st(self)._model())._renameProtocolTo_(_st(self)._input());
- return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameProtocolCommand)})},
- messageSends: ["renameProtocolTo:", "input", "model"]}),
- smalltalk.HLRenameProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isActive",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameProtocolCommand)})},
- messageSends: ["notNil", "selectedProtocol", "model"]}),
- smalltalk.HLRenameProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isInputRequired",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return true;
- }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameProtocolCommand)})},
- messageSends: []}),
- smalltalk.HLRenameProtocolCommand);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "key",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "t";
- }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameProtocolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "label",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Protocol";
- }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameProtocolCommand.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "menuLabel",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return "Rename protocol...";
- }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameProtocolCommand.klass)})},
- messageSends: []}),
- smalltalk.HLRenameProtocolCommand.klass);
|