2
0

Helios-Commands-Tools.deploy.js 39 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343
  1. smalltalk.addPackage('Helios-Commands-Tools');
  2. smalltalk.addClass('HLToolCommand', smalltalk.HLModelCommand, [], 'Helios-Commands-Tools');
  3. smalltalk.addMethod(
  4. smalltalk.method({
  5. selector: "category",
  6. fn: function (){
  7. var self=this;
  8. return smalltalk.withContext(function($ctx1) {
  9. return nil;
  10. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLToolCommand)})},
  11. messageSends: []}),
  12. smalltalk.HLToolCommand);
  13. smalltalk.addMethod(
  14. smalltalk.method({
  15. selector: "for:",
  16. fn: function (aToolModel){
  17. var self=this;
  18. return smalltalk.withContext(function($ctx1) {
  19. var $2,$3,$1;
  20. $2=_st(self)._new();
  21. _st($2)._model_(aToolModel);
  22. $3=_st($2)._yourself();
  23. $1=$3;
  24. return $1;
  25. }, function($ctx1) {$ctx1.fill(self,"for:",{aToolModel:aToolModel},smalltalk.HLToolCommand.klass)})},
  26. messageSends: ["model:", "new", "yourself"]}),
  27. smalltalk.HLToolCommand.klass);
  28. smalltalk.addMethod(
  29. smalltalk.method({
  30. selector: "isValidFor:",
  31. fn: function (aModel){
  32. var self=this;
  33. return smalltalk.withContext(function($ctx1) {
  34. var $1;
  35. $1=_st(aModel)._isToolModel();
  36. return $1;
  37. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{aModel:aModel},smalltalk.HLToolCommand.klass)})},
  38. messageSends: ["isToolModel"]}),
  39. smalltalk.HLToolCommand.klass);
  40. smalltalk.addClass('HLCommitPackageCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  41. smalltalk.addMethod(
  42. smalltalk.method({
  43. selector: "category",
  44. fn: function (){
  45. var self=this;
  46. return smalltalk.withContext(function($ctx1) {
  47. return "Packages";
  48. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCommitPackageCommand)})},
  49. messageSends: []}),
  50. smalltalk.HLCommitPackageCommand);
  51. smalltalk.addMethod(
  52. smalltalk.method({
  53. selector: "execute",
  54. fn: function (){
  55. var self=this;
  56. return smalltalk.withContext(function($ctx1) {
  57. _st(_st(self)._model())._commitPackage();
  58. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCommitPackageCommand)})},
  59. messageSends: ["commitPackage", "model"]}),
  60. smalltalk.HLCommitPackageCommand);
  61. smalltalk.addMethod(
  62. smalltalk.method({
  63. selector: "isActive",
  64. fn: function (){
  65. var self=this;
  66. return smalltalk.withContext(function($ctx1) {
  67. return true;
  68. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCommitPackageCommand)})},
  69. messageSends: []}),
  70. smalltalk.HLCommitPackageCommand);
  71. smalltalk.addMethod(
  72. smalltalk.method({
  73. selector: "key",
  74. fn: function (){
  75. var self=this;
  76. return smalltalk.withContext(function($ctx1) {
  77. return "k";
  78. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCommitPackageCommand.klass)})},
  79. messageSends: []}),
  80. smalltalk.HLCommitPackageCommand.klass);
  81. smalltalk.addMethod(
  82. smalltalk.method({
  83. selector: "label",
  84. fn: function (){
  85. var self=this;
  86. return smalltalk.withContext(function($ctx1) {
  87. return "Commit";
  88. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCommitPackageCommand.klass)})},
  89. messageSends: []}),
  90. smalltalk.HLCommitPackageCommand.klass);
  91. smalltalk.addClass('HLCopyCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  92. smalltalk.addMethod(
  93. smalltalk.method({
  94. selector: "key",
  95. fn: function (){
  96. var self=this;
  97. return smalltalk.withContext(function($ctx1) {
  98. return "c";
  99. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyCommand.klass)})},
  100. messageSends: []}),
  101. smalltalk.HLCopyCommand.klass);
  102. smalltalk.addMethod(
  103. smalltalk.method({
  104. selector: "label",
  105. fn: function (){
  106. var self=this;
  107. return smalltalk.withContext(function($ctx1) {
  108. return "Copy";
  109. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyCommand.klass)})},
  110. messageSends: []}),
  111. smalltalk.HLCopyCommand.klass);
  112. smalltalk.addClass('HLCopyClassCommand', smalltalk.HLCopyCommand, [], 'Helios-Commands-Tools');
  113. smalltalk.addMethod(
  114. smalltalk.method({
  115. selector: "category",
  116. fn: function (){
  117. var self=this;
  118. return smalltalk.withContext(function($ctx1) {
  119. return "Classes";
  120. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCopyClassCommand)})},
  121. messageSends: []}),
  122. smalltalk.HLCopyClassCommand);
  123. smalltalk.addMethod(
  124. smalltalk.method({
  125. selector: "defaultInput",
  126. fn: function (){
  127. var self=this;
  128. return smalltalk.withContext(function($ctx1) {
  129. var $1;
  130. $1=_st(_st(_st(self)._model())._selectedClass())._name();
  131. return $1;
  132. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLCopyClassCommand)})},
  133. messageSends: ["name", "selectedClass", "model"]}),
  134. smalltalk.HLCopyClassCommand);
  135. smalltalk.addMethod(
  136. smalltalk.method({
  137. selector: "displayLabel",
  138. fn: function (){
  139. var self=this;
  140. return smalltalk.withContext(function($ctx1) {
  141. return "New class name:";
  142. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLCopyClassCommand)})},
  143. messageSends: []}),
  144. smalltalk.HLCopyClassCommand);
  145. smalltalk.addMethod(
  146. smalltalk.method({
  147. selector: "execute",
  148. fn: function (){
  149. var self=this;
  150. return smalltalk.withContext(function($ctx1) {
  151. _st(_st(self)._model())._copyClassTo_(_st(self)._input());
  152. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCopyClassCommand)})},
  153. messageSends: ["copyClassTo:", "input", "model"]}),
  154. smalltalk.HLCopyClassCommand);
  155. smalltalk.addMethod(
  156. smalltalk.method({
  157. selector: "isActive",
  158. fn: function (){
  159. var self=this;
  160. return smalltalk.withContext(function($ctx1) {
  161. var $1;
  162. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  163. return $1;
  164. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCopyClassCommand)})},
  165. messageSends: ["notNil", "selectedClass", "model"]}),
  166. smalltalk.HLCopyClassCommand);
  167. smalltalk.addMethod(
  168. smalltalk.method({
  169. selector: "isInputRequired",
  170. fn: function (){
  171. var self=this;
  172. return smalltalk.withContext(function($ctx1) {
  173. return true;
  174. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLCopyClassCommand)})},
  175. messageSends: []}),
  176. smalltalk.HLCopyClassCommand);
  177. smalltalk.addMethod(
  178. smalltalk.method({
  179. selector: "key",
  180. fn: function (){
  181. var self=this;
  182. return smalltalk.withContext(function($ctx1) {
  183. return "c";
  184. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyClassCommand.klass)})},
  185. messageSends: []}),
  186. smalltalk.HLCopyClassCommand.klass);
  187. smalltalk.addMethod(
  188. smalltalk.method({
  189. selector: "label",
  190. fn: function (){
  191. var self=this;
  192. return smalltalk.withContext(function($ctx1) {
  193. return "Class";
  194. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyClassCommand.klass)})},
  195. messageSends: []}),
  196. smalltalk.HLCopyClassCommand.klass);
  197. smalltalk.addMethod(
  198. smalltalk.method({
  199. selector: "menuLabel",
  200. fn: function (){
  201. var self=this;
  202. return smalltalk.withContext(function($ctx1) {
  203. return "Copy class...";
  204. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLCopyClassCommand.klass)})},
  205. messageSends: []}),
  206. smalltalk.HLCopyClassCommand.klass);
  207. smalltalk.addClass('HLFindCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  208. smalltalk.addMethod(
  209. smalltalk.method({
  210. selector: "key",
  211. fn: function (){
  212. var self=this;
  213. return smalltalk.withContext(function($ctx1) {
  214. return "f";
  215. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindCommand.klass)})},
  216. messageSends: []}),
  217. smalltalk.HLFindCommand.klass);
  218. smalltalk.addMethod(
  219. smalltalk.method({
  220. selector: "label",
  221. fn: function (){
  222. var self=this;
  223. return smalltalk.withContext(function($ctx1) {
  224. return "Find";
  225. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindCommand.klass)})},
  226. messageSends: []}),
  227. smalltalk.HLFindCommand.klass);
  228. smalltalk.addClass('HLFindClassCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Tools');
  229. smalltalk.addMethod(
  230. smalltalk.method({
  231. selector: "displayLabel",
  232. fn: function (){
  233. var self=this;
  234. return smalltalk.withContext(function($ctx1) {
  235. return "select a class";
  236. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindClassCommand)})},
  237. messageSends: []}),
  238. smalltalk.HLFindClassCommand);
  239. smalltalk.addMethod(
  240. smalltalk.method({
  241. selector: "execute",
  242. fn: function (){
  243. var self=this;
  244. return smalltalk.withContext(function($ctx1) {
  245. _st(_st(self)._model())._openClassNamed_(_st(self)._input());
  246. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindClassCommand)})},
  247. messageSends: ["openClassNamed:", "input", "model"]}),
  248. smalltalk.HLFindClassCommand);
  249. smalltalk.addMethod(
  250. smalltalk.method({
  251. selector: "inputCompletion",
  252. fn: function (){
  253. var self=this;
  254. return smalltalk.withContext(function($ctx1) {
  255. var $1;
  256. $1=_st(_st(self)._model())._availableClassNames();
  257. return $1;
  258. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindClassCommand)})},
  259. messageSends: ["availableClassNames", "model"]}),
  260. smalltalk.HLFindClassCommand);
  261. smalltalk.addMethod(
  262. smalltalk.method({
  263. selector: "inputLabel",
  264. fn: function (){
  265. var self=this;
  266. return smalltalk.withContext(function($ctx1) {
  267. return "Find a class";
  268. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindClassCommand)})},
  269. messageSends: []}),
  270. smalltalk.HLFindClassCommand);
  271. smalltalk.addMethod(
  272. smalltalk.method({
  273. selector: "isInputRequired",
  274. fn: function (){
  275. var self=this;
  276. return smalltalk.withContext(function($ctx1) {
  277. return true;
  278. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindClassCommand)})},
  279. messageSends: []}),
  280. smalltalk.HLFindClassCommand);
  281. smalltalk.addMethod(
  282. smalltalk.method({
  283. selector: "isValidFor:",
  284. fn: function (aModel){
  285. var self=this;
  286. return smalltalk.withContext(function($ctx1) {
  287. var $1;
  288. $1=_st(aModel)._isBrowserModel();
  289. return $1;
  290. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{aModel:aModel},smalltalk.HLFindClassCommand.klass)})},
  291. messageSends: ["isBrowserModel"]}),
  292. smalltalk.HLFindClassCommand.klass);
  293. smalltalk.addMethod(
  294. smalltalk.method({
  295. selector: "key",
  296. fn: function (){
  297. var self=this;
  298. return smalltalk.withContext(function($ctx1) {
  299. return "c";
  300. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})},
  301. messageSends: []}),
  302. smalltalk.HLFindClassCommand.klass);
  303. smalltalk.addMethod(
  304. smalltalk.method({
  305. selector: "label",
  306. fn: function (){
  307. var self=this;
  308. return smalltalk.withContext(function($ctx1) {
  309. return "Class";
  310. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})},
  311. messageSends: []}),
  312. smalltalk.HLFindClassCommand.klass);
  313. smalltalk.addClass('HLFindReferencesCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Tools');
  314. smalltalk.addMethod(
  315. smalltalk.method({
  316. selector: "defaultInput",
  317. fn: function (){
  318. var self=this;
  319. return smalltalk.withContext(function($ctx1) {
  320. var $2,$3,$1;
  321. $2=_st(_st(self)._model())._selectedMethod();
  322. if(($receiver = $2) == nil || $receiver == undefined){
  323. $3=_st(_st(self)._model())._selectedClass();
  324. if(($receiver = $3) == nil || $receiver == undefined){
  325. $1="";
  326. } else {
  327. var class_;
  328. class_=$receiver;
  329. $1=_st(class_)._name();
  330. };
  331. } else {
  332. var method;
  333. method=$receiver;
  334. $1=_st(method)._selector();
  335. };
  336. return $1;
  337. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLFindReferencesCommand)})},
  338. messageSends: ["ifNil:ifNotNil:", "name", "selectedClass", "model", "selector", "selectedMethod"]}),
  339. smalltalk.HLFindReferencesCommand);
  340. smalltalk.addMethod(
  341. smalltalk.method({
  342. selector: "displayLabel",
  343. fn: function (){
  344. var self=this;
  345. return smalltalk.withContext(function($ctx1) {
  346. return "find references";
  347. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindReferencesCommand)})},
  348. messageSends: []}),
  349. smalltalk.HLFindReferencesCommand);
  350. smalltalk.addMethod(
  351. smalltalk.method({
  352. selector: "execute",
  353. fn: function (){
  354. var self=this;
  355. function $HLReferences(){return smalltalk.HLReferences||(typeof HLReferences=="undefined"?nil:HLReferences)}
  356. return smalltalk.withContext(function($ctx1) {
  357. var $1,$2;
  358. $1=_st($HLReferences())._new();
  359. _st($1)._open();
  360. $2=_st($1)._search_(_st(self)._input());
  361. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindReferencesCommand)})},
  362. messageSends: ["open", "new", "search:", "input"]}),
  363. smalltalk.HLFindReferencesCommand);
  364. smalltalk.addMethod(
  365. smalltalk.method({
  366. selector: "inputCompletion",
  367. fn: function (){
  368. var self=this;
  369. return smalltalk.withContext(function($ctx1) {
  370. var $1;
  371. $1=_st(_st(_st(self)._model())._availableClassNames()).__comma(_st(_st(self)._model())._allSelectors());
  372. return $1;
  373. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindReferencesCommand)})},
  374. messageSends: [",", "allSelectors", "model", "availableClassNames"]}),
  375. smalltalk.HLFindReferencesCommand);
  376. smalltalk.addMethod(
  377. smalltalk.method({
  378. selector: "inputLabel",
  379. fn: function (){
  380. var self=this;
  381. return smalltalk.withContext(function($ctx1) {
  382. return "Find references of";
  383. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindReferencesCommand)})},
  384. messageSends: []}),
  385. smalltalk.HLFindReferencesCommand);
  386. smalltalk.addMethod(
  387. smalltalk.method({
  388. selector: "isInputRequired",
  389. fn: function (){
  390. var self=this;
  391. return smalltalk.withContext(function($ctx1) {
  392. return true;
  393. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindReferencesCommand)})},
  394. messageSends: []}),
  395. smalltalk.HLFindReferencesCommand);
  396. smalltalk.addMethod(
  397. smalltalk.method({
  398. selector: "key",
  399. fn: function (){
  400. var self=this;
  401. return smalltalk.withContext(function($ctx1) {
  402. return "r";
  403. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindReferencesCommand.klass)})},
  404. messageSends: []}),
  405. smalltalk.HLFindReferencesCommand.klass);
  406. smalltalk.addMethod(
  407. smalltalk.method({
  408. selector: "label",
  409. fn: function (){
  410. var self=this;
  411. return smalltalk.withContext(function($ctx1) {
  412. return "References";
  413. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindReferencesCommand.klass)})},
  414. messageSends: []}),
  415. smalltalk.HLFindReferencesCommand.klass);
  416. smalltalk.addClass('HLMoveToCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  417. smalltalk.addMethod(
  418. smalltalk.method({
  419. selector: "key",
  420. fn: function (){
  421. var self=this;
  422. return smalltalk.withContext(function($ctx1) {
  423. return "m";
  424. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  425. messageSends: []}),
  426. smalltalk.HLMoveToCommand.klass);
  427. smalltalk.addMethod(
  428. smalltalk.method({
  429. selector: "label",
  430. fn: function (){
  431. var self=this;
  432. return smalltalk.withContext(function($ctx1) {
  433. return "Move";
  434. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  435. messageSends: []}),
  436. smalltalk.HLMoveToCommand.klass);
  437. smalltalk.addClass('HLMoveClassToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Tools');
  438. smalltalk.addMethod(
  439. smalltalk.method({
  440. selector: "isActive",
  441. fn: function (){
  442. var self=this;
  443. return smalltalk.withContext(function($ctx1) {
  444. var $1;
  445. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  446. return $1;
  447. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveClassToCommand)})},
  448. messageSends: ["notNil", "selectedClass", "model"]}),
  449. smalltalk.HLMoveClassToCommand);
  450. smalltalk.addMethod(
  451. smalltalk.method({
  452. selector: "key",
  453. fn: function (){
  454. var self=this;
  455. return smalltalk.withContext(function($ctx1) {
  456. return "c";
  457. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToCommand.klass)})},
  458. messageSends: []}),
  459. smalltalk.HLMoveClassToCommand.klass);
  460. smalltalk.addMethod(
  461. smalltalk.method({
  462. selector: "label",
  463. fn: function (){
  464. var self=this;
  465. return smalltalk.withContext(function($ctx1) {
  466. return "Class";
  467. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToCommand.klass)})},
  468. messageSends: []}),
  469. smalltalk.HLMoveClassToCommand.klass);
  470. smalltalk.addClass('HLMoveClassToPackageCommand', smalltalk.HLMoveClassToCommand, [], 'Helios-Commands-Tools');
  471. smalltalk.addMethod(
  472. smalltalk.method({
  473. selector: "category",
  474. fn: function (){
  475. var self=this;
  476. return smalltalk.withContext(function($ctx1) {
  477. return "Classes";
  478. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveClassToPackageCommand)})},
  479. messageSends: []}),
  480. smalltalk.HLMoveClassToPackageCommand);
  481. smalltalk.addMethod(
  482. smalltalk.method({
  483. selector: "displayLabel",
  484. fn: function (){
  485. var self=this;
  486. return smalltalk.withContext(function($ctx1) {
  487. return "select a package";
  488. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveClassToPackageCommand)})},
  489. messageSends: []}),
  490. smalltalk.HLMoveClassToPackageCommand);
  491. smalltalk.addMethod(
  492. smalltalk.method({
  493. selector: "execute",
  494. fn: function (){
  495. var self=this;
  496. return smalltalk.withContext(function($ctx1) {
  497. _st(_st(self)._model())._moveClassToPackage_(_st(self)._input());
  498. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveClassToPackageCommand)})},
  499. messageSends: ["moveClassToPackage:", "input", "model"]}),
  500. smalltalk.HLMoveClassToPackageCommand);
  501. smalltalk.addMethod(
  502. smalltalk.method({
  503. selector: "inputCompletion",
  504. fn: function (){
  505. var self=this;
  506. return smalltalk.withContext(function($ctx1) {
  507. var $1;
  508. $1=_st(_st(self)._model())._availablePackageNames();
  509. return $1;
  510. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveClassToPackageCommand)})},
  511. messageSends: ["availablePackageNames", "model"]}),
  512. smalltalk.HLMoveClassToPackageCommand);
  513. smalltalk.addMethod(
  514. smalltalk.method({
  515. selector: "inputLabel",
  516. fn: function (){
  517. var self=this;
  518. return smalltalk.withContext(function($ctx1) {
  519. return "Move class to package:";
  520. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveClassToPackageCommand)})},
  521. messageSends: []}),
  522. smalltalk.HLMoveClassToPackageCommand);
  523. smalltalk.addMethod(
  524. smalltalk.method({
  525. selector: "isInputRequired",
  526. fn: function (){
  527. var self=this;
  528. return smalltalk.withContext(function($ctx1) {
  529. return true;
  530. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveClassToPackageCommand)})},
  531. messageSends: []}),
  532. smalltalk.HLMoveClassToPackageCommand);
  533. smalltalk.addMethod(
  534. smalltalk.method({
  535. selector: "key",
  536. fn: function (){
  537. var self=this;
  538. return smalltalk.withContext(function($ctx1) {
  539. return "p";
  540. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
  541. messageSends: []}),
  542. smalltalk.HLMoveClassToPackageCommand.klass);
  543. smalltalk.addMethod(
  544. smalltalk.method({
  545. selector: "label",
  546. fn: function (){
  547. var self=this;
  548. return smalltalk.withContext(function($ctx1) {
  549. return "to package";
  550. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
  551. messageSends: []}),
  552. smalltalk.HLMoveClassToPackageCommand.klass);
  553. smalltalk.addMethod(
  554. smalltalk.method({
  555. selector: "menuLabel",
  556. fn: function (){
  557. var self=this;
  558. return smalltalk.withContext(function($ctx1) {
  559. return "Move to package...";
  560. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
  561. messageSends: []}),
  562. smalltalk.HLMoveClassToPackageCommand.klass);
  563. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Tools');
  564. smalltalk.addMethod(
  565. smalltalk.method({
  566. selector: "category",
  567. fn: function (){
  568. var self=this;
  569. return smalltalk.withContext(function($ctx1) {
  570. return "Methods";
  571. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveMethodToCommand)})},
  572. messageSends: []}),
  573. smalltalk.HLMoveMethodToCommand);
  574. smalltalk.addMethod(
  575. smalltalk.method({
  576. selector: "isActive",
  577. fn: function (){
  578. var self=this;
  579. return smalltalk.withContext(function($ctx1) {
  580. var $1;
  581. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  582. return $1;
  583. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
  584. messageSends: ["notNil", "selectedMethod", "model"]}),
  585. smalltalk.HLMoveMethodToCommand);
  586. smalltalk.addMethod(
  587. smalltalk.method({
  588. selector: "key",
  589. fn: function (){
  590. var self=this;
  591. return smalltalk.withContext(function($ctx1) {
  592. return "m";
  593. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  594. messageSends: []}),
  595. smalltalk.HLMoveMethodToCommand.klass);
  596. smalltalk.addMethod(
  597. smalltalk.method({
  598. selector: "label",
  599. fn: function (){
  600. var self=this;
  601. return smalltalk.withContext(function($ctx1) {
  602. return "Method";
  603. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  604. messageSends: []}),
  605. smalltalk.HLMoveMethodToCommand.klass);
  606. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Tools');
  607. smalltalk.addMethod(
  608. smalltalk.method({
  609. selector: "displayLabel",
  610. fn: function (){
  611. var self=this;
  612. return smalltalk.withContext(function($ctx1) {
  613. return "select a class";
  614. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  615. messageSends: []}),
  616. smalltalk.HLMoveMethodToClassCommand);
  617. smalltalk.addMethod(
  618. smalltalk.method({
  619. selector: "execute",
  620. fn: function (){
  621. var self=this;
  622. return smalltalk.withContext(function($ctx1) {
  623. _st(_st(self)._model())._moveMethodToClass_(_st(self)._input());
  624. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  625. messageSends: ["moveMethodToClass:", "input", "model"]}),
  626. smalltalk.HLMoveMethodToClassCommand);
  627. smalltalk.addMethod(
  628. smalltalk.method({
  629. selector: "inputCompletion",
  630. fn: function (){
  631. var self=this;
  632. return smalltalk.withContext(function($ctx1) {
  633. var $1;
  634. $1=_st(_st(self)._model())._availableClassNames();
  635. return $1;
  636. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToClassCommand)})},
  637. messageSends: ["availableClassNames", "model"]}),
  638. smalltalk.HLMoveMethodToClassCommand);
  639. smalltalk.addMethod(
  640. smalltalk.method({
  641. selector: "inputLabel",
  642. fn: function (){
  643. var self=this;
  644. return smalltalk.withContext(function($ctx1) {
  645. return "Move method to class:";
  646. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  647. messageSends: []}),
  648. smalltalk.HLMoveMethodToClassCommand);
  649. smalltalk.addMethod(
  650. smalltalk.method({
  651. selector: "isInputRequired",
  652. fn: function (){
  653. var self=this;
  654. return smalltalk.withContext(function($ctx1) {
  655. return true;
  656. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
  657. messageSends: []}),
  658. smalltalk.HLMoveMethodToClassCommand);
  659. smalltalk.addMethod(
  660. smalltalk.method({
  661. selector: "key",
  662. fn: function (){
  663. var self=this;
  664. return smalltalk.withContext(function($ctx1) {
  665. return "c";
  666. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  667. messageSends: []}),
  668. smalltalk.HLMoveMethodToClassCommand.klass);
  669. smalltalk.addMethod(
  670. smalltalk.method({
  671. selector: "label",
  672. fn: function (){
  673. var self=this;
  674. return smalltalk.withContext(function($ctx1) {
  675. return "to class";
  676. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  677. messageSends: []}),
  678. smalltalk.HLMoveMethodToClassCommand.klass);
  679. smalltalk.addMethod(
  680. smalltalk.method({
  681. selector: "menuLabel",
  682. fn: function (){
  683. var self=this;
  684. return smalltalk.withContext(function($ctx1) {
  685. return "Move to class...";
  686. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  687. messageSends: []}),
  688. smalltalk.HLMoveMethodToClassCommand.klass);
  689. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Tools');
  690. smalltalk.addMethod(
  691. smalltalk.method({
  692. selector: "displayLabel",
  693. fn: function (){
  694. var self=this;
  695. return smalltalk.withContext(function($ctx1) {
  696. return "select a protocol";
  697. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  698. messageSends: []}),
  699. smalltalk.HLMoveMethodToProtocolCommand);
  700. smalltalk.addMethod(
  701. smalltalk.method({
  702. selector: "execute",
  703. fn: function (){
  704. var self=this;
  705. return smalltalk.withContext(function($ctx1) {
  706. _st(_st(self)._model())._moveMethodToProtocol_(_st(self)._input());
  707. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  708. messageSends: ["moveMethodToProtocol:", "input", "model"]}),
  709. smalltalk.HLMoveMethodToProtocolCommand);
  710. smalltalk.addMethod(
  711. smalltalk.method({
  712. selector: "inputCompletion",
  713. fn: function (){
  714. var self=this;
  715. return smalltalk.withContext(function($ctx1) {
  716. var $1;
  717. $1=_st(_st(self)._model())._availableProtocols();
  718. return $1;
  719. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  720. messageSends: ["availableProtocols", "model"]}),
  721. smalltalk.HLMoveMethodToProtocolCommand);
  722. smalltalk.addMethod(
  723. smalltalk.method({
  724. selector: "inputLabel",
  725. fn: function (){
  726. var self=this;
  727. return smalltalk.withContext(function($ctx1) {
  728. return "Move method to a protocol:";
  729. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  730. messageSends: []}),
  731. smalltalk.HLMoveMethodToProtocolCommand);
  732. smalltalk.addMethod(
  733. smalltalk.method({
  734. selector: "isInputRequired",
  735. fn: function (){
  736. var self=this;
  737. return smalltalk.withContext(function($ctx1) {
  738. return true;
  739. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  740. messageSends: []}),
  741. smalltalk.HLMoveMethodToProtocolCommand);
  742. smalltalk.addMethod(
  743. smalltalk.method({
  744. selector: "key",
  745. fn: function (){
  746. var self=this;
  747. return smalltalk.withContext(function($ctx1) {
  748. return "t";
  749. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  750. messageSends: []}),
  751. smalltalk.HLMoveMethodToProtocolCommand.klass);
  752. smalltalk.addMethod(
  753. smalltalk.method({
  754. selector: "label",
  755. fn: function (){
  756. var self=this;
  757. return smalltalk.withContext(function($ctx1) {
  758. return "to protocol";
  759. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  760. messageSends: []}),
  761. smalltalk.HLMoveMethodToProtocolCommand.klass);
  762. smalltalk.addMethod(
  763. smalltalk.method({
  764. selector: "menuLabel",
  765. fn: function (){
  766. var self=this;
  767. return smalltalk.withContext(function($ctx1) {
  768. return "Move to protocol...";
  769. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  770. messageSends: []}),
  771. smalltalk.HLMoveMethodToProtocolCommand.klass);
  772. smalltalk.addClass('HLRemoveCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  773. smalltalk.addMethod(
  774. smalltalk.method({
  775. selector: "key",
  776. fn: function (){
  777. var self=this;
  778. return smalltalk.withContext(function($ctx1) {
  779. return "x";
  780. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})},
  781. messageSends: []}),
  782. smalltalk.HLRemoveCommand.klass);
  783. smalltalk.addMethod(
  784. smalltalk.method({
  785. selector: "label",
  786. fn: function (){
  787. var self=this;
  788. return smalltalk.withContext(function($ctx1) {
  789. return "Remove";
  790. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})},
  791. messageSends: []}),
  792. smalltalk.HLRemoveCommand.klass);
  793. smalltalk.addClass('HLRemoveClassCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
  794. smalltalk.addMethod(
  795. smalltalk.method({
  796. selector: "category",
  797. fn: function (){
  798. var self=this;
  799. return smalltalk.withContext(function($ctx1) {
  800. return "Classes";
  801. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveClassCommand)})},
  802. messageSends: []}),
  803. smalltalk.HLRemoveClassCommand);
  804. smalltalk.addMethod(
  805. smalltalk.method({
  806. selector: "execute",
  807. fn: function (){
  808. var self=this;
  809. return smalltalk.withContext(function($ctx1) {
  810. _st(_st(self)._model())._removeClass();
  811. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveClassCommand)})},
  812. messageSends: ["removeClass", "model"]}),
  813. smalltalk.HLRemoveClassCommand);
  814. smalltalk.addMethod(
  815. smalltalk.method({
  816. selector: "isActive",
  817. fn: function (){
  818. var self=this;
  819. return smalltalk.withContext(function($ctx1) {
  820. var $1;
  821. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  822. return $1;
  823. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveClassCommand)})},
  824. messageSends: ["notNil", "selectedClass", "model"]}),
  825. smalltalk.HLRemoveClassCommand);
  826. smalltalk.addMethod(
  827. smalltalk.method({
  828. selector: "key",
  829. fn: function (){
  830. var self=this;
  831. return smalltalk.withContext(function($ctx1) {
  832. return "c";
  833. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveClassCommand.klass)})},
  834. messageSends: []}),
  835. smalltalk.HLRemoveClassCommand.klass);
  836. smalltalk.addMethod(
  837. smalltalk.method({
  838. selector: "label",
  839. fn: function (){
  840. var self=this;
  841. return smalltalk.withContext(function($ctx1) {
  842. return "Class";
  843. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveClassCommand.klass)})},
  844. messageSends: []}),
  845. smalltalk.HLRemoveClassCommand.klass);
  846. smalltalk.addMethod(
  847. smalltalk.method({
  848. selector: "menuLabel",
  849. fn: function (){
  850. var self=this;
  851. return smalltalk.withContext(function($ctx1) {
  852. return "Remove class";
  853. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveClassCommand.klass)})},
  854. messageSends: []}),
  855. smalltalk.HLRemoveClassCommand.klass);
  856. smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
  857. smalltalk.addMethod(
  858. smalltalk.method({
  859. selector: "category",
  860. fn: function (){
  861. var self=this;
  862. return smalltalk.withContext(function($ctx1) {
  863. return "Methods";
  864. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveMethodCommand)})},
  865. messageSends: []}),
  866. smalltalk.HLRemoveMethodCommand);
  867. smalltalk.addMethod(
  868. smalltalk.method({
  869. selector: "execute",
  870. fn: function (){
  871. var self=this;
  872. return smalltalk.withContext(function($ctx1) {
  873. _st(_st(self)._model())._removeMethod();
  874. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveMethodCommand)})},
  875. messageSends: ["removeMethod", "model"]}),
  876. smalltalk.HLRemoveMethodCommand);
  877. smalltalk.addMethod(
  878. smalltalk.method({
  879. selector: "isActive",
  880. fn: function (){
  881. var self=this;
  882. return smalltalk.withContext(function($ctx1) {
  883. var $1;
  884. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  885. return $1;
  886. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveMethodCommand)})},
  887. messageSends: ["notNil", "selectedMethod", "model"]}),
  888. smalltalk.HLRemoveMethodCommand);
  889. smalltalk.addMethod(
  890. smalltalk.method({
  891. selector: "key",
  892. fn: function (){
  893. var self=this;
  894. return smalltalk.withContext(function($ctx1) {
  895. return "m";
  896. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})},
  897. messageSends: []}),
  898. smalltalk.HLRemoveMethodCommand.klass);
  899. smalltalk.addMethod(
  900. smalltalk.method({
  901. selector: "label",
  902. fn: function (){
  903. var self=this;
  904. return smalltalk.withContext(function($ctx1) {
  905. return "Method";
  906. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})},
  907. messageSends: []}),
  908. smalltalk.HLRemoveMethodCommand.klass);
  909. smalltalk.addMethod(
  910. smalltalk.method({
  911. selector: "menuLabel",
  912. fn: function (){
  913. var self=this;
  914. return smalltalk.withContext(function($ctx1) {
  915. return "Remove method";
  916. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveMethodCommand.klass)})},
  917. messageSends: []}),
  918. smalltalk.HLRemoveMethodCommand.klass);
  919. smalltalk.addClass('HLRemoveProtocolCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
  920. smalltalk.addMethod(
  921. smalltalk.method({
  922. selector: "category",
  923. fn: function (){
  924. var self=this;
  925. return smalltalk.withContext(function($ctx1) {
  926. return "Protocols";
  927. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveProtocolCommand)})},
  928. messageSends: []}),
  929. smalltalk.HLRemoveProtocolCommand);
  930. smalltalk.addMethod(
  931. smalltalk.method({
  932. selector: "execute",
  933. fn: function (){
  934. var self=this;
  935. return smalltalk.withContext(function($ctx1) {
  936. _st(_st(self)._model())._removeProtocol();
  937. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveProtocolCommand)})},
  938. messageSends: ["removeProtocol", "model"]}),
  939. smalltalk.HLRemoveProtocolCommand);
  940. smalltalk.addMethod(
  941. smalltalk.method({
  942. selector: "isActive",
  943. fn: function (){
  944. var self=this;
  945. return smalltalk.withContext(function($ctx1) {
  946. var $1;
  947. $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
  948. return $1;
  949. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveProtocolCommand)})},
  950. messageSends: ["notNil", "selectedProtocol", "model"]}),
  951. smalltalk.HLRemoveProtocolCommand);
  952. smalltalk.addMethod(
  953. smalltalk.method({
  954. selector: "key",
  955. fn: function (){
  956. var self=this;
  957. return smalltalk.withContext(function($ctx1) {
  958. return "t";
  959. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  960. messageSends: []}),
  961. smalltalk.HLRemoveProtocolCommand.klass);
  962. smalltalk.addMethod(
  963. smalltalk.method({
  964. selector: "label",
  965. fn: function (){
  966. var self=this;
  967. return smalltalk.withContext(function($ctx1) {
  968. return "Protocol";
  969. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  970. messageSends: []}),
  971. smalltalk.HLRemoveProtocolCommand.klass);
  972. smalltalk.addMethod(
  973. smalltalk.method({
  974. selector: "menuLabel",
  975. fn: function (){
  976. var self=this;
  977. return smalltalk.withContext(function($ctx1) {
  978. return "Remove protocol";
  979. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  980. messageSends: []}),
  981. smalltalk.HLRemoveProtocolCommand.klass);
  982. smalltalk.addClass('HLRenameCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  983. smalltalk.addMethod(
  984. smalltalk.method({
  985. selector: "key",
  986. fn: function (){
  987. var self=this;
  988. return smalltalk.withContext(function($ctx1) {
  989. return "r";
  990. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameCommand.klass)})},
  991. messageSends: []}),
  992. smalltalk.HLRenameCommand.klass);
  993. smalltalk.addMethod(
  994. smalltalk.method({
  995. selector: "label",
  996. fn: function (){
  997. var self=this;
  998. return smalltalk.withContext(function($ctx1) {
  999. return "Rename";
  1000. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameCommand.klass)})},
  1001. messageSends: []}),
  1002. smalltalk.HLRenameCommand.klass);
  1003. smalltalk.addClass('HLRenameClassCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Tools');
  1004. smalltalk.addMethod(
  1005. smalltalk.method({
  1006. selector: "category",
  1007. fn: function (){
  1008. var self=this;
  1009. return smalltalk.withContext(function($ctx1) {
  1010. return "Classes";
  1011. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameClassCommand)})},
  1012. messageSends: []}),
  1013. smalltalk.HLRenameClassCommand);
  1014. smalltalk.addMethod(
  1015. smalltalk.method({
  1016. selector: "defaultInput",
  1017. fn: function (){
  1018. var self=this;
  1019. return smalltalk.withContext(function($ctx1) {
  1020. var $1;
  1021. $1=_st(_st(_st(self)._model())._selectedClass())._name();
  1022. return $1;
  1023. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameClassCommand)})},
  1024. messageSends: ["name", "selectedClass", "model"]}),
  1025. smalltalk.HLRenameClassCommand);
  1026. smalltalk.addMethod(
  1027. smalltalk.method({
  1028. selector: "displayLabel",
  1029. fn: function (){
  1030. var self=this;
  1031. return smalltalk.withContext(function($ctx1) {
  1032. return "Rename class to:";
  1033. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameClassCommand)})},
  1034. messageSends: []}),
  1035. smalltalk.HLRenameClassCommand);
  1036. smalltalk.addMethod(
  1037. smalltalk.method({
  1038. selector: "execute",
  1039. fn: function (){
  1040. var self=this;
  1041. return smalltalk.withContext(function($ctx1) {
  1042. _st(_st(self)._model())._renameClassTo_(_st(self)._input());
  1043. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameClassCommand)})},
  1044. messageSends: ["renameClassTo:", "input", "model"]}),
  1045. smalltalk.HLRenameClassCommand);
  1046. smalltalk.addMethod(
  1047. smalltalk.method({
  1048. selector: "isActive",
  1049. fn: function (){
  1050. var self=this;
  1051. return smalltalk.withContext(function($ctx1) {
  1052. var $1;
  1053. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  1054. return $1;
  1055. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameClassCommand)})},
  1056. messageSends: ["notNil", "selectedClass", "model"]}),
  1057. smalltalk.HLRenameClassCommand);
  1058. smalltalk.addMethod(
  1059. smalltalk.method({
  1060. selector: "isInputRequired",
  1061. fn: function (){
  1062. var self=this;
  1063. return smalltalk.withContext(function($ctx1) {
  1064. return true;
  1065. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameClassCommand)})},
  1066. messageSends: []}),
  1067. smalltalk.HLRenameClassCommand);
  1068. smalltalk.addMethod(
  1069. smalltalk.method({
  1070. selector: "key",
  1071. fn: function (){
  1072. var self=this;
  1073. return smalltalk.withContext(function($ctx1) {
  1074. return "c";
  1075. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameClassCommand.klass)})},
  1076. messageSends: []}),
  1077. smalltalk.HLRenameClassCommand.klass);
  1078. smalltalk.addMethod(
  1079. smalltalk.method({
  1080. selector: "label",
  1081. fn: function (){
  1082. var self=this;
  1083. return smalltalk.withContext(function($ctx1) {
  1084. return "Class";
  1085. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameClassCommand.klass)})},
  1086. messageSends: []}),
  1087. smalltalk.HLRenameClassCommand.klass);
  1088. smalltalk.addMethod(
  1089. smalltalk.method({
  1090. selector: "menuLabel",
  1091. fn: function (){
  1092. var self=this;
  1093. return smalltalk.withContext(function($ctx1) {
  1094. return "Rename class...";
  1095. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameClassCommand.klass)})},
  1096. messageSends: []}),
  1097. smalltalk.HLRenameClassCommand.klass);
  1098. smalltalk.addClass('HLRenameProtocolCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Tools');
  1099. smalltalk.addMethod(
  1100. smalltalk.method({
  1101. selector: "category",
  1102. fn: function (){
  1103. var self=this;
  1104. return smalltalk.withContext(function($ctx1) {
  1105. return "Protocols";
  1106. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameProtocolCommand)})},
  1107. messageSends: []}),
  1108. smalltalk.HLRenameProtocolCommand);
  1109. smalltalk.addMethod(
  1110. smalltalk.method({
  1111. selector: "defaultInput",
  1112. fn: function (){
  1113. var self=this;
  1114. return smalltalk.withContext(function($ctx1) {
  1115. var $1;
  1116. $1=_st(_st(self)._model())._selectedProtocol();
  1117. return $1;
  1118. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameProtocolCommand)})},
  1119. messageSends: ["selectedProtocol", "model"]}),
  1120. smalltalk.HLRenameProtocolCommand);
  1121. smalltalk.addMethod(
  1122. smalltalk.method({
  1123. selector: "displayLabel",
  1124. fn: function (){
  1125. var self=this;
  1126. return smalltalk.withContext(function($ctx1) {
  1127. return "Rename protocol to:";
  1128. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameProtocolCommand)})},
  1129. messageSends: []}),
  1130. smalltalk.HLRenameProtocolCommand);
  1131. smalltalk.addMethod(
  1132. smalltalk.method({
  1133. selector: "execute",
  1134. fn: function (){
  1135. var self=this;
  1136. return smalltalk.withContext(function($ctx1) {
  1137. _st(_st(self)._model())._renameProtocolTo_(_st(self)._input());
  1138. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameProtocolCommand)})},
  1139. messageSends: ["renameProtocolTo:", "input", "model"]}),
  1140. smalltalk.HLRenameProtocolCommand);
  1141. smalltalk.addMethod(
  1142. smalltalk.method({
  1143. selector: "isActive",
  1144. fn: function (){
  1145. var self=this;
  1146. return smalltalk.withContext(function($ctx1) {
  1147. var $1;
  1148. $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
  1149. return $1;
  1150. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameProtocolCommand)})},
  1151. messageSends: ["notNil", "selectedProtocol", "model"]}),
  1152. smalltalk.HLRenameProtocolCommand);
  1153. smalltalk.addMethod(
  1154. smalltalk.method({
  1155. selector: "isInputRequired",
  1156. fn: function (){
  1157. var self=this;
  1158. return smalltalk.withContext(function($ctx1) {
  1159. return true;
  1160. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameProtocolCommand)})},
  1161. messageSends: []}),
  1162. smalltalk.HLRenameProtocolCommand);
  1163. smalltalk.addMethod(
  1164. smalltalk.method({
  1165. selector: "key",
  1166. fn: function (){
  1167. var self=this;
  1168. return smalltalk.withContext(function($ctx1) {
  1169. return "t";
  1170. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1171. messageSends: []}),
  1172. smalltalk.HLRenameProtocolCommand.klass);
  1173. smalltalk.addMethod(
  1174. smalltalk.method({
  1175. selector: "label",
  1176. fn: function (){
  1177. var self=this;
  1178. return smalltalk.withContext(function($ctx1) {
  1179. return "Protocol";
  1180. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1181. messageSends: []}),
  1182. smalltalk.HLRenameProtocolCommand.klass);
  1183. smalltalk.addMethod(
  1184. smalltalk.method({
  1185. selector: "menuLabel",
  1186. fn: function (){
  1187. var self=this;
  1188. return smalltalk.withContext(function($ctx1) {
  1189. return "Rename protocol...";
  1190. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1191. messageSends: []}),
  1192. smalltalk.HLRenameProtocolCommand.klass);