smalltalk.addPackage('Helios-Commands-Browser'); smalltalk.addClass('HLBrowserCommand', smalltalk.HLModelCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return nil; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLBrowserCommand)})}, args: [], source: "category\x0a\x09^ nil", messageSends: [], referencedClasses: [] }), smalltalk.HLBrowserCommand); smalltalk.addMethod( smalltalk.method({ selector: "for:", category: 'instance creation', fn: function (aBrowserModel){ var self=this; return smalltalk.withContext(function($ctx1) { var $2,$3,$1; $2=_st(self)._new(); _st($2)._model_(aBrowserModel); $3=_st($2)._yourself(); $1=$3; return $1; }, function($ctx1) {$ctx1.fill(self,"for:",{aBrowserModel:aBrowserModel},smalltalk.HLBrowserCommand.klass)})}, args: ["aBrowserModel"], source: "for: aBrowserModel\x0a\x09^ self new\x0a \x09model: aBrowserModel;\x0a yourself", messageSends: ["model:", "new", "yourself"], referencedClasses: [] }), smalltalk.HLBrowserCommand.klass); smalltalk.addClass('HLBrowserGoToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "g"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLBrowserGoToCommand.klass)})}, args: [], source: "key\x0a\x09^ 'g'", messageSends: [], referencedClasses: [] }), smalltalk.HLBrowserGoToCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Go to"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLBrowserGoToCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Go to'", messageSends: [], referencedClasses: [] }), smalltalk.HLBrowserGoToCommand.klass); smalltalk.addClass('HLGoToClassesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnClasses(); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToClassesCommand)})}, args: [], source: "execute\x0a\x09self model focusOnClasses", messageSends: ["focusOnClasses", "model"], referencedClasses: [] }), smalltalk.HLGoToClassesCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToClassesCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToClassesCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Classes"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToClassesCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Classes'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToClassesCommand.klass); smalltalk.addClass('HLGoToMethodsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnMethods(); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToMethodsCommand)})}, args: [], source: "execute\x0a\x09self model focusOnMethods", messageSends: ["focusOnMethods", "model"], referencedClasses: [] }), smalltalk.HLGoToMethodsCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "m"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToMethodsCommand.klass)})}, args: [], source: "key\x0a\x09^ 'm'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToMethodsCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Methods"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToMethodsCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Methods'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToMethodsCommand.klass); smalltalk.addClass('HLGoToPackagesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnPackages(); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToPackagesCommand)})}, args: [], source: "execute\x0a\x09self model focusOnPackages", messageSends: ["focusOnPackages", "model"], referencedClasses: [] }), smalltalk.HLGoToPackagesCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "p"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToPackagesCommand.klass)})}, args: [], source: "key\x0a\x09^ 'p'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToPackagesCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Packages"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToPackagesCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Packages'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToPackagesCommand.klass); smalltalk.addClass('HLGoToProtocolsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnProtocols(); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToProtocolsCommand)})}, args: [], source: "execute\x0a\x09self model focusOnProtocols", messageSends: ["focusOnProtocols", "model"], referencedClasses: [] }), smalltalk.HLGoToProtocolsCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "t"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToProtocolsCommand.klass)})}, args: [], source: "key\x0a\x09^ 't'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToProtocolsCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Protocols"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToProtocolsCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Protocols'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToProtocolsCommand.klass); smalltalk.addClass('HLGoToSourceCodeCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnSourceCode(); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToSourceCodeCommand)})}, args: [], source: "execute\x0a\x09self model focusOnSourceCode", messageSends: ["focusOnSourceCode", "model"], referencedClasses: [] }), smalltalk.HLGoToSourceCodeCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "s"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToSourceCodeCommand.klass)})}, args: [], source: "key\x0a\x09^ 's'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToSourceCodeCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Source code"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToSourceCodeCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Source code'", messageSends: [], referencedClasses: [] }), smalltalk.HLGoToSourceCodeCommand.klass); smalltalk.addClass('HLCommitPackageCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Packages"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCommitPackageCommand)})}, args: [], source: "category\x0a\x09^ 'Packages'", messageSends: [], referencedClasses: [] }), smalltalk.HLCommitPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model commitPackage", messageSends: ["commitPackage", "model"], referencedClasses: [] }), smalltalk.HLCommitPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCommitPackageCommand)})}, args: [], source: "isActive\x0a\x09^ true\x0a\x09\x22 slf model isPackageDirty\x22", messageSends: [], referencedClasses: [] }), smalltalk.HLCommitPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "k"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCommitPackageCommand.klass)})}, args: [], source: "key\x0a\x09^ 'k'", messageSends: [], referencedClasses: [] }), smalltalk.HLCommitPackageCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Commit"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCommitPackageCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Commit'", messageSends: [], referencedClasses: [] }), smalltalk.HLCommitPackageCommand.klass); smalltalk.addClass('HLCopyCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Copy"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Copy'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyCommand.klass); smalltalk.addClass('HLCopyClassCommand', smalltalk.HLCopyCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Classes"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCopyClassCommand)})}, args: [], source: "category\x0a\x09^ 'Classes'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "defaultInput", category: 'defaults', 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)})}, args: [], source: "defaultInput\x0a\x09^ self model selectedClass name", messageSends: ["name", "selectedClass", "model"], referencedClasses: [] }), smalltalk.HLCopyClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "New class name:"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLCopyClassCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'New class name:'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model copyClassTo: self input", messageSends: ["copyClassTo:", "input", "model"], referencedClasses: [] }), smalltalk.HLCopyClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedClass notNil", messageSends: ["notNil", "selectedClass", "model"], referencedClasses: [] }), smalltalk.HLCopyClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLCopyClassCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyClassCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Class"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyClassCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Class'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Copy class..."; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLCopyClassCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Copy class...'", messageSends: [], referencedClasses: [] }), smalltalk.HLCopyClassCommand.klass); smalltalk.addClass('HLFindCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "f"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindCommand.klass)})}, args: [], source: "key\x0a\x09^ 'f'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Find"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Find'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindCommand.klass); smalltalk.addClass('HLFindClassCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "select a class"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindClassCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'select a class'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model openClassNamed: self input", messageSends: ["openClassNamed:", "input", "model"], referencedClasses: [] }), smalltalk.HLFindClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputCompletion", category: 'accessing', 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)})}, args: [], source: "inputCompletion\x0a\x09^ self model availableClassNames", messageSends: ["availableClassNames", "model"], referencedClasses: [] }), smalltalk.HLFindClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Find a class"; }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindClassCommand)})}, args: [], source: "inputLabel\x0a\x09^ 'Find a class'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindClassCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLFindClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Class"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Class'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindClassCommand.klass); smalltalk.addClass('HLFindReferencesCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "defaultInput", category: 'defaults', 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)})}, args: [], source: "defaultInput\x0a\x09^ self model selectedMethod \x0a\x09\x09ifNil: [\x0a\x09\x09\x09self model selectedClass\x0a\x09\x09\x09\x09ifNil: [ '' ]\x0a\x09\x09\x09\x09ifNotNil: [ :class | class name ] ]\x0a\x09\x09ifNotNil: [ :method | method selector ] ", messageSends: ["ifNil:ifNotNil:", "name", "selectedClass", "model", "selector", "selectedMethod"], referencedClasses: [] }), smalltalk.HLFindReferencesCommand); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "find references"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindReferencesCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'find references'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindReferencesCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09HLReferences new \x0a\x09\x09open;\x0a\x09\x09search: self input", messageSends: ["open", "new", "search:", "input"], referencedClasses: ["HLReferences"] }), smalltalk.HLFindReferencesCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputCompletion", category: 'accessing', 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)})}, args: [], source: "inputCompletion\x0a\x09^ self model availableClassNames, self model allSelectors", messageSends: [",", "allSelectors", "model", "availableClassNames"], referencedClasses: [] }), smalltalk.HLFindReferencesCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Find references of"; }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindReferencesCommand)})}, args: [], source: "inputLabel\x0a\x09^ 'Find references of'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindReferencesCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindReferencesCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLFindReferencesCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "r"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindReferencesCommand.klass)})}, args: [], source: "key\x0a\x09^ 'r'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindReferencesCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "References"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindReferencesCommand.klass)})}, args: [], source: "label\x0a\x09^ 'References'", messageSends: [], referencedClasses: [] }), smalltalk.HLFindReferencesCommand.klass); smalltalk.addClass('HLMoveToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "m"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})}, args: [], source: "key\x0a\x09^ 'm'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveToCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Move'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveToCommand.klass); smalltalk.addClass('HLMoveClassToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedClass notNil", messageSends: ["notNil", "selectedClass", "model"], referencedClasses: [] }), smalltalk.HLMoveClassToCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Class"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Class'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToCommand.klass); smalltalk.addClass('HLMoveClassToPackageCommand', smalltalk.HLMoveClassToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Classes"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveClassToPackageCommand)})}, args: [], source: "category\x0a\x09^ 'Classes'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "select a package"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveClassCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'select a package'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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.HLMoveClassCommand)})}, args: [], source: "execute\x0a\x09self model moveClassToPackage: self input", messageSends: ["moveClassToPackage:", "input", "model"], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputCompletion", category: 'accessing', 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.HLMoveClassCommand)})}, args: [], source: "inputCompletion\x0a\x09^ self model availablePackageNames", messageSends: ["availablePackageNames", "model"], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move class to package:"; }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveClassCommand)})}, args: [], source: "inputLabel\x0a\x09^ 'Move class to package:'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveClassCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "p"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassCommand.klass)})}, args: [], source: "key\x0a\x09^ 'p'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "to package"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassCommand.klass)})}, args: [], source: "label\x0a\x09^ 'to package'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move to package..."; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveClassCommand.klass)})}, args: [], source: "menuLabel\x09\x0a\x09^ 'Move to package...'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveClassToPackageCommand.klass); smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Methods"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveMethodToCommand)})}, args: [], source: "category\x0a\x09^ 'Methods'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedMethod notNil", messageSends: ["notNil", "selectedMethod", "model"], referencedClasses: [] }), smalltalk.HLMoveMethodToCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "m"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})}, args: [], source: "key\x0a\x09^ 'm'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Method"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Method'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToCommand.klass); smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "select a class"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'select a class'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model moveMethodToClass: self input", messageSends: ["moveMethodToClass:", "input", "model"], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputCompletion", category: 'accessing', 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)})}, args: [], source: "inputCompletion\x0a\x09^ self model availableClassNames", messageSends: ["availableClassNames", "model"], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move method to class:"; }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})}, args: [], source: "inputLabel\x0a\x09^ 'Move method to class:'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "to class"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})}, args: [], source: "label\x09\x0a\x09^ 'to class'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move to class..."; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToClassCommand.klass)})}, args: [], source: "menuLabel\x09\x0a\x09^ 'Move to class...'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToClassCommand.klass); smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "select a protocol"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'select a protocol'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model moveMethodToProtocol: self input", messageSends: ["moveMethodToProtocol:", "input", "model"], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputCompletion", category: 'accessing', 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)})}, args: [], source: "inputCompletion\x0a\x09^ self model availableProtocols", messageSends: ["availableProtocols", "model"], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "inputLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move method to a protocol:"; }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})}, args: [], source: "inputLabel\x0a\x09^ 'Move method to a protocol:'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "t"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})}, args: [], source: "key\x0a\x09^ 't'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "to protocol"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})}, args: [], source: "label\x0a\x09^ 'to protocol'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Move to protocol..."; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Move to protocol...'", messageSends: [], referencedClasses: [] }), smalltalk.HLMoveMethodToProtocolCommand.klass); smalltalk.addClass('HLRemoveCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "x"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})}, args: [], source: "key\x0a\x09^ 'x'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Remove"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Remove'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveCommand.klass); smalltalk.addClass('HLRemoveClassCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Classes"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveClassCommand)})}, args: [], source: "category\x0a\x09^ 'Classes'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model removeClass", messageSends: ["removeClass", "model"], referencedClasses: [] }), smalltalk.HLRemoveClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedClass notNil", messageSends: ["notNil", "selectedClass", "model"], referencedClasses: [] }), smalltalk.HLRemoveClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveClassCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Class"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveClassCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Class'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Remove class"; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveClassCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Remove class'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveClassCommand.klass); smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Methods"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveMethodCommand)})}, args: [], source: "category\x0a\x09^ 'Methods'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveMethodCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model removeMethod", messageSends: ["removeMethod", "model"], referencedClasses: [] }), smalltalk.HLRemoveMethodCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedMethod notNil", messageSends: ["notNil", "selectedMethod", "model"], referencedClasses: [] }), smalltalk.HLRemoveMethodCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "m"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})}, args: [], source: "key\x0a\x09^ 'm'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveMethodCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Method"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Method'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveMethodCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Remove method"; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveMethodCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Remove method'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveMethodCommand.klass); smalltalk.addClass('HLRemoveProtocolCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Protocols"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveProtocolCommand)})}, args: [], source: "category\x0a\x09^ 'Protocols'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model removeProtocol", messageSends: ["removeProtocol", "model"], referencedClasses: [] }), smalltalk.HLRemoveProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedProtocol notNil", messageSends: ["notNil", "selectedProtocol", "model"], referencedClasses: [] }), smalltalk.HLRemoveProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "t"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveProtocolCommand.klass)})}, args: [], source: "key\x0a\x09^ 't'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveProtocolCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Protocol"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveProtocolCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Protocol'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveProtocolCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Remove protocol"; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveProtocolCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Remove protocol'", messageSends: [], referencedClasses: [] }), smalltalk.HLRemoveProtocolCommand.klass); smalltalk.addClass('HLRenameCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "r"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameCommand.klass)})}, args: [], source: "key\x0a\x09^ 'r'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Rename"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Rename'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameCommand.klass); smalltalk.addClass('HLRenameClassCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Classes"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameClassCommand)})}, args: [], source: "category\x0a\x09^ 'Classes'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "defaultInput", category: 'defaults', 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)})}, args: [], source: "defaultInput\x0a\x09^ self model selectedClass name", messageSends: ["name", "selectedClass", "model"], referencedClasses: [] }), smalltalk.HLRenameClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Rename class to:"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameClassCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'Rename class to:'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model renameClassTo: self input", messageSends: ["renameClassTo:", "input", "model"], referencedClasses: [] }), smalltalk.HLRenameClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedClass notNil", messageSends: ["notNil", "selectedClass", "model"], referencedClasses: [] }), smalltalk.HLRenameClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameClassCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameClassCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameClassCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Class"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameClassCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Class'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameClassCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Rename class..."; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameClassCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Rename class...'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameClassCommand.klass); smalltalk.addClass('HLRenameProtocolCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "category", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Protocols"; }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameProtocolCommand)})}, args: [], source: "category\x0a\x09^ 'Protocols'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "defaultInput", category: 'defaults', 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)})}, args: [], source: "defaultInput\x0a\x09^ self model selectedProtocol", messageSends: ["selectedProtocol", "model"], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "displayLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Rename protocol to:"; }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameProtocolCommand)})}, args: [], source: "displayLabel\x0a\x09^ 'Rename protocol to:'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', 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)})}, args: [], source: "execute\x0a\x09self model renameProtocolTo: self input", messageSends: ["renameProtocolTo:", "input", "model"], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "isActive", category: 'testing', 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)})}, args: [], source: "isActive\x0a\x09^ self model selectedProtocol notNil", messageSends: ["notNil", "selectedProtocol", "model"], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "isInputRequired", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return true; }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameProtocolCommand)})}, args: [], source: "isInputRequired\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "t"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameProtocolCommand.klass)})}, args: [], source: "key\x0a\x09^ 't'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Protocol"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameProtocolCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Protocol'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "menuLabel", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Rename protocol..."; }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameProtocolCommand.klass)})}, args: [], source: "menuLabel\x0a\x09^ 'Rename protocol...'", messageSends: [], referencedClasses: [] }), smalltalk.HLRenameProtocolCommand.klass); smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "t"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})}, args: [], source: "key\x0a\x09^ 't'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Toggle"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Toggle'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleCommand.klass); smalltalk.addClass('HLToggleClassCommentCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showComment_(true); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassCommentCommand)})}, args: [], source: "execute\x0a\x09self model showComment: true", messageSends: ["showComment:", "model"], referencedClasses: [] }), smalltalk.HLToggleClassCommentCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "d"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassCommentCommand.klass)})}, args: [], source: "key\x0a\x09^ 'd'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleClassCommentCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Documentation"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassCommentCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Documentation'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleClassCommentCommand.klass); smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(false); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})}, args: [], source: "execute\x0a\x09self model showInstance: false", messageSends: ["showInstance:", "model"], referencedClasses: [] }), smalltalk.HLToggleClassSideCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "c"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})}, args: [], source: "key\x0a\x09^ 'c'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleClassSideCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Class side"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Class side'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleClassSideCommand.klass); smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser'); smalltalk.addMethod( smalltalk.method({ selector: "execute", category: 'executing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(true); return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})}, args: [], source: "execute\x0a\x09self model showInstance: true", messageSends: ["showInstance:", "model"], referencedClasses: [] }), smalltalk.HLToggleInstanceSideCommand); smalltalk.addMethod( smalltalk.method({ selector: "key", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "i"; }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})}, args: [], source: "key\x0a\x09^ 'i'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleInstanceSideCommand.klass); smalltalk.addMethod( smalltalk.method({ selector: "label", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx1) { return "Instance side"; }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})}, args: [], source: "label\x0a\x09^ 'Instance side'", messageSends: [], referencedClasses: [] }), smalltalk.HLToggleInstanceSideCommand.klass);