2
0

Helios-Commands-Tools.deploy.js 38 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330
  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: "key",
  284. fn: function (){
  285. var self=this;
  286. return smalltalk.withContext(function($ctx1) {
  287. return "c";
  288. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})},
  289. messageSends: []}),
  290. smalltalk.HLFindClassCommand.klass);
  291. smalltalk.addMethod(
  292. smalltalk.method({
  293. selector: "label",
  294. fn: function (){
  295. var self=this;
  296. return smalltalk.withContext(function($ctx1) {
  297. return "Class";
  298. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})},
  299. messageSends: []}),
  300. smalltalk.HLFindClassCommand.klass);
  301. smalltalk.addClass('HLFindReferencesCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Tools');
  302. smalltalk.addMethod(
  303. smalltalk.method({
  304. selector: "defaultInput",
  305. fn: function (){
  306. var self=this;
  307. return smalltalk.withContext(function($ctx1) {
  308. var $2,$3,$1;
  309. $2=_st(_st(self)._model())._selectedMethod();
  310. if(($receiver = $2) == nil || $receiver == undefined){
  311. $3=_st(_st(self)._model())._selectedClass();
  312. if(($receiver = $3) == nil || $receiver == undefined){
  313. $1="";
  314. } else {
  315. var class_;
  316. class_=$receiver;
  317. $1=_st(class_)._name();
  318. };
  319. } else {
  320. var method;
  321. method=$receiver;
  322. $1=_st(method)._selector();
  323. };
  324. return $1;
  325. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLFindReferencesCommand)})},
  326. messageSends: ["ifNil:ifNotNil:", "name", "selectedClass", "model", "selector", "selectedMethod"]}),
  327. smalltalk.HLFindReferencesCommand);
  328. smalltalk.addMethod(
  329. smalltalk.method({
  330. selector: "displayLabel",
  331. fn: function (){
  332. var self=this;
  333. return smalltalk.withContext(function($ctx1) {
  334. return "find references";
  335. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindReferencesCommand)})},
  336. messageSends: []}),
  337. smalltalk.HLFindReferencesCommand);
  338. smalltalk.addMethod(
  339. smalltalk.method({
  340. selector: "execute",
  341. fn: function (){
  342. var self=this;
  343. function $HLReferences(){return smalltalk.HLReferences||(typeof HLReferences=="undefined"?nil:HLReferences)}
  344. return smalltalk.withContext(function($ctx1) {
  345. var $1,$2;
  346. $1=_st($HLReferences())._new();
  347. _st($1)._open();
  348. $2=_st($1)._search_(_st(self)._input());
  349. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindReferencesCommand)})},
  350. messageSends: ["open", "new", "search:", "input"]}),
  351. smalltalk.HLFindReferencesCommand);
  352. smalltalk.addMethod(
  353. smalltalk.method({
  354. selector: "inputCompletion",
  355. fn: function (){
  356. var self=this;
  357. return smalltalk.withContext(function($ctx1) {
  358. var $1;
  359. $1=_st(_st(_st(self)._model())._availableClassNames()).__comma(_st(_st(self)._model())._allSelectors());
  360. return $1;
  361. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindReferencesCommand)})},
  362. messageSends: [",", "allSelectors", "model", "availableClassNames"]}),
  363. smalltalk.HLFindReferencesCommand);
  364. smalltalk.addMethod(
  365. smalltalk.method({
  366. selector: "inputLabel",
  367. fn: function (){
  368. var self=this;
  369. return smalltalk.withContext(function($ctx1) {
  370. return "Find references of";
  371. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindReferencesCommand)})},
  372. messageSends: []}),
  373. smalltalk.HLFindReferencesCommand);
  374. smalltalk.addMethod(
  375. smalltalk.method({
  376. selector: "isInputRequired",
  377. fn: function (){
  378. var self=this;
  379. return smalltalk.withContext(function($ctx1) {
  380. return true;
  381. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindReferencesCommand)})},
  382. messageSends: []}),
  383. smalltalk.HLFindReferencesCommand);
  384. smalltalk.addMethod(
  385. smalltalk.method({
  386. selector: "key",
  387. fn: function (){
  388. var self=this;
  389. return smalltalk.withContext(function($ctx1) {
  390. return "r";
  391. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindReferencesCommand.klass)})},
  392. messageSends: []}),
  393. smalltalk.HLFindReferencesCommand.klass);
  394. smalltalk.addMethod(
  395. smalltalk.method({
  396. selector: "label",
  397. fn: function (){
  398. var self=this;
  399. return smalltalk.withContext(function($ctx1) {
  400. return "References";
  401. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindReferencesCommand.klass)})},
  402. messageSends: []}),
  403. smalltalk.HLFindReferencesCommand.klass);
  404. smalltalk.addClass('HLMoveToCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  405. smalltalk.addMethod(
  406. smalltalk.method({
  407. selector: "key",
  408. fn: function (){
  409. var self=this;
  410. return smalltalk.withContext(function($ctx1) {
  411. return "m";
  412. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  413. messageSends: []}),
  414. smalltalk.HLMoveToCommand.klass);
  415. smalltalk.addMethod(
  416. smalltalk.method({
  417. selector: "label",
  418. fn: function (){
  419. var self=this;
  420. return smalltalk.withContext(function($ctx1) {
  421. return "Move";
  422. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  423. messageSends: []}),
  424. smalltalk.HLMoveToCommand.klass);
  425. smalltalk.addClass('HLMoveClassToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Tools');
  426. smalltalk.addMethod(
  427. smalltalk.method({
  428. selector: "isActive",
  429. fn: function (){
  430. var self=this;
  431. return smalltalk.withContext(function($ctx1) {
  432. var $1;
  433. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  434. return $1;
  435. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveClassToCommand)})},
  436. messageSends: ["notNil", "selectedClass", "model"]}),
  437. smalltalk.HLMoveClassToCommand);
  438. smalltalk.addMethod(
  439. smalltalk.method({
  440. selector: "key",
  441. fn: function (){
  442. var self=this;
  443. return smalltalk.withContext(function($ctx1) {
  444. return "c";
  445. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToCommand.klass)})},
  446. messageSends: []}),
  447. smalltalk.HLMoveClassToCommand.klass);
  448. smalltalk.addMethod(
  449. smalltalk.method({
  450. selector: "label",
  451. fn: function (){
  452. var self=this;
  453. return smalltalk.withContext(function($ctx1) {
  454. return "Class";
  455. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToCommand.klass)})},
  456. messageSends: []}),
  457. smalltalk.HLMoveClassToCommand.klass);
  458. smalltalk.addClass('HLMoveClassToPackageCommand', smalltalk.HLMoveClassToCommand, [], 'Helios-Commands-Tools');
  459. smalltalk.addMethod(
  460. smalltalk.method({
  461. selector: "category",
  462. fn: function (){
  463. var self=this;
  464. return smalltalk.withContext(function($ctx1) {
  465. return "Classes";
  466. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveClassToPackageCommand)})},
  467. messageSends: []}),
  468. smalltalk.HLMoveClassToPackageCommand);
  469. smalltalk.addMethod(
  470. smalltalk.method({
  471. selector: "displayLabel",
  472. fn: function (){
  473. var self=this;
  474. return smalltalk.withContext(function($ctx1) {
  475. return "select a package";
  476. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveClassToPackageCommand)})},
  477. messageSends: []}),
  478. smalltalk.HLMoveClassToPackageCommand);
  479. smalltalk.addMethod(
  480. smalltalk.method({
  481. selector: "execute",
  482. fn: function (){
  483. var self=this;
  484. return smalltalk.withContext(function($ctx1) {
  485. _st(_st(self)._model())._moveClassToPackage_(_st(self)._input());
  486. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveClassToPackageCommand)})},
  487. messageSends: ["moveClassToPackage:", "input", "model"]}),
  488. smalltalk.HLMoveClassToPackageCommand);
  489. smalltalk.addMethod(
  490. smalltalk.method({
  491. selector: "inputCompletion",
  492. fn: function (){
  493. var self=this;
  494. return smalltalk.withContext(function($ctx1) {
  495. var $1;
  496. $1=_st(_st(self)._model())._availablePackageNames();
  497. return $1;
  498. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveClassToPackageCommand)})},
  499. messageSends: ["availablePackageNames", "model"]}),
  500. smalltalk.HLMoveClassToPackageCommand);
  501. smalltalk.addMethod(
  502. smalltalk.method({
  503. selector: "inputLabel",
  504. fn: function (){
  505. var self=this;
  506. return smalltalk.withContext(function($ctx1) {
  507. return "Move class to package:";
  508. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveClassToPackageCommand)})},
  509. messageSends: []}),
  510. smalltalk.HLMoveClassToPackageCommand);
  511. smalltalk.addMethod(
  512. smalltalk.method({
  513. selector: "isInputRequired",
  514. fn: function (){
  515. var self=this;
  516. return smalltalk.withContext(function($ctx1) {
  517. return true;
  518. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveClassToPackageCommand)})},
  519. messageSends: []}),
  520. smalltalk.HLMoveClassToPackageCommand);
  521. smalltalk.addMethod(
  522. smalltalk.method({
  523. selector: "key",
  524. fn: function (){
  525. var self=this;
  526. return smalltalk.withContext(function($ctx1) {
  527. return "p";
  528. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
  529. messageSends: []}),
  530. smalltalk.HLMoveClassToPackageCommand.klass);
  531. smalltalk.addMethod(
  532. smalltalk.method({
  533. selector: "label",
  534. fn: function (){
  535. var self=this;
  536. return smalltalk.withContext(function($ctx1) {
  537. return "to package";
  538. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
  539. messageSends: []}),
  540. smalltalk.HLMoveClassToPackageCommand.klass);
  541. smalltalk.addMethod(
  542. smalltalk.method({
  543. selector: "menuLabel",
  544. fn: function (){
  545. var self=this;
  546. return smalltalk.withContext(function($ctx1) {
  547. return "Move to package...";
  548. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveClassToPackageCommand.klass)})},
  549. messageSends: []}),
  550. smalltalk.HLMoveClassToPackageCommand.klass);
  551. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Tools');
  552. smalltalk.addMethod(
  553. smalltalk.method({
  554. selector: "category",
  555. fn: function (){
  556. var self=this;
  557. return smalltalk.withContext(function($ctx1) {
  558. return "Methods";
  559. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveMethodToCommand)})},
  560. messageSends: []}),
  561. smalltalk.HLMoveMethodToCommand);
  562. smalltalk.addMethod(
  563. smalltalk.method({
  564. selector: "isActive",
  565. fn: function (){
  566. var self=this;
  567. return smalltalk.withContext(function($ctx1) {
  568. var $1;
  569. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  570. return $1;
  571. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
  572. messageSends: ["notNil", "selectedMethod", "model"]}),
  573. smalltalk.HLMoveMethodToCommand);
  574. smalltalk.addMethod(
  575. smalltalk.method({
  576. selector: "key",
  577. fn: function (){
  578. var self=this;
  579. return smalltalk.withContext(function($ctx1) {
  580. return "m";
  581. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  582. messageSends: []}),
  583. smalltalk.HLMoveMethodToCommand.klass);
  584. smalltalk.addMethod(
  585. smalltalk.method({
  586. selector: "label",
  587. fn: function (){
  588. var self=this;
  589. return smalltalk.withContext(function($ctx1) {
  590. return "Method";
  591. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  592. messageSends: []}),
  593. smalltalk.HLMoveMethodToCommand.klass);
  594. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Tools');
  595. smalltalk.addMethod(
  596. smalltalk.method({
  597. selector: "displayLabel",
  598. fn: function (){
  599. var self=this;
  600. return smalltalk.withContext(function($ctx1) {
  601. return "select a class";
  602. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  603. messageSends: []}),
  604. smalltalk.HLMoveMethodToClassCommand);
  605. smalltalk.addMethod(
  606. smalltalk.method({
  607. selector: "execute",
  608. fn: function (){
  609. var self=this;
  610. return smalltalk.withContext(function($ctx1) {
  611. _st(_st(self)._model())._moveMethodToClass_(_st(self)._input());
  612. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  613. messageSends: ["moveMethodToClass:", "input", "model"]}),
  614. smalltalk.HLMoveMethodToClassCommand);
  615. smalltalk.addMethod(
  616. smalltalk.method({
  617. selector: "inputCompletion",
  618. fn: function (){
  619. var self=this;
  620. return smalltalk.withContext(function($ctx1) {
  621. var $1;
  622. $1=_st(_st(self)._model())._availableClassNames();
  623. return $1;
  624. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToClassCommand)})},
  625. messageSends: ["availableClassNames", "model"]}),
  626. smalltalk.HLMoveMethodToClassCommand);
  627. smalltalk.addMethod(
  628. smalltalk.method({
  629. selector: "inputLabel",
  630. fn: function (){
  631. var self=this;
  632. return smalltalk.withContext(function($ctx1) {
  633. return "Move method to class:";
  634. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  635. messageSends: []}),
  636. smalltalk.HLMoveMethodToClassCommand);
  637. smalltalk.addMethod(
  638. smalltalk.method({
  639. selector: "isInputRequired",
  640. fn: function (){
  641. var self=this;
  642. return smalltalk.withContext(function($ctx1) {
  643. return true;
  644. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
  645. messageSends: []}),
  646. smalltalk.HLMoveMethodToClassCommand);
  647. smalltalk.addMethod(
  648. smalltalk.method({
  649. selector: "key",
  650. fn: function (){
  651. var self=this;
  652. return smalltalk.withContext(function($ctx1) {
  653. return "c";
  654. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  655. messageSends: []}),
  656. smalltalk.HLMoveMethodToClassCommand.klass);
  657. smalltalk.addMethod(
  658. smalltalk.method({
  659. selector: "label",
  660. fn: function (){
  661. var self=this;
  662. return smalltalk.withContext(function($ctx1) {
  663. return "to class";
  664. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  665. messageSends: []}),
  666. smalltalk.HLMoveMethodToClassCommand.klass);
  667. smalltalk.addMethod(
  668. smalltalk.method({
  669. selector: "menuLabel",
  670. fn: function (){
  671. var self=this;
  672. return smalltalk.withContext(function($ctx1) {
  673. return "Move to class...";
  674. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  675. messageSends: []}),
  676. smalltalk.HLMoveMethodToClassCommand.klass);
  677. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Tools');
  678. smalltalk.addMethod(
  679. smalltalk.method({
  680. selector: "displayLabel",
  681. fn: function (){
  682. var self=this;
  683. return smalltalk.withContext(function($ctx1) {
  684. return "select a protocol";
  685. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  686. messageSends: []}),
  687. smalltalk.HLMoveMethodToProtocolCommand);
  688. smalltalk.addMethod(
  689. smalltalk.method({
  690. selector: "execute",
  691. fn: function (){
  692. var self=this;
  693. return smalltalk.withContext(function($ctx1) {
  694. _st(_st(self)._model())._moveMethodToProtocol_(_st(self)._input());
  695. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  696. messageSends: ["moveMethodToProtocol:", "input", "model"]}),
  697. smalltalk.HLMoveMethodToProtocolCommand);
  698. smalltalk.addMethod(
  699. smalltalk.method({
  700. selector: "inputCompletion",
  701. fn: function (){
  702. var self=this;
  703. return smalltalk.withContext(function($ctx1) {
  704. var $1;
  705. $1=_st(_st(self)._model())._availableProtocols();
  706. return $1;
  707. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  708. messageSends: ["availableProtocols", "model"]}),
  709. smalltalk.HLMoveMethodToProtocolCommand);
  710. smalltalk.addMethod(
  711. smalltalk.method({
  712. selector: "inputLabel",
  713. fn: function (){
  714. var self=this;
  715. return smalltalk.withContext(function($ctx1) {
  716. return "Move method to a protocol:";
  717. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  718. messageSends: []}),
  719. smalltalk.HLMoveMethodToProtocolCommand);
  720. smalltalk.addMethod(
  721. smalltalk.method({
  722. selector: "isInputRequired",
  723. fn: function (){
  724. var self=this;
  725. return smalltalk.withContext(function($ctx1) {
  726. return true;
  727. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  728. messageSends: []}),
  729. smalltalk.HLMoveMethodToProtocolCommand);
  730. smalltalk.addMethod(
  731. smalltalk.method({
  732. selector: "key",
  733. fn: function (){
  734. var self=this;
  735. return smalltalk.withContext(function($ctx1) {
  736. return "t";
  737. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  738. messageSends: []}),
  739. smalltalk.HLMoveMethodToProtocolCommand.klass);
  740. smalltalk.addMethod(
  741. smalltalk.method({
  742. selector: "label",
  743. fn: function (){
  744. var self=this;
  745. return smalltalk.withContext(function($ctx1) {
  746. return "to protocol";
  747. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  748. messageSends: []}),
  749. smalltalk.HLMoveMethodToProtocolCommand.klass);
  750. smalltalk.addMethod(
  751. smalltalk.method({
  752. selector: "menuLabel",
  753. fn: function (){
  754. var self=this;
  755. return smalltalk.withContext(function($ctx1) {
  756. return "Move to protocol...";
  757. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  758. messageSends: []}),
  759. smalltalk.HLMoveMethodToProtocolCommand.klass);
  760. smalltalk.addClass('HLRemoveCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  761. smalltalk.addMethod(
  762. smalltalk.method({
  763. selector: "key",
  764. fn: function (){
  765. var self=this;
  766. return smalltalk.withContext(function($ctx1) {
  767. return "x";
  768. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})},
  769. messageSends: []}),
  770. smalltalk.HLRemoveCommand.klass);
  771. smalltalk.addMethod(
  772. smalltalk.method({
  773. selector: "label",
  774. fn: function (){
  775. var self=this;
  776. return smalltalk.withContext(function($ctx1) {
  777. return "Remove";
  778. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})},
  779. messageSends: []}),
  780. smalltalk.HLRemoveCommand.klass);
  781. smalltalk.addClass('HLRemoveClassCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
  782. smalltalk.addMethod(
  783. smalltalk.method({
  784. selector: "category",
  785. fn: function (){
  786. var self=this;
  787. return smalltalk.withContext(function($ctx1) {
  788. return "Classes";
  789. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveClassCommand)})},
  790. messageSends: []}),
  791. smalltalk.HLRemoveClassCommand);
  792. smalltalk.addMethod(
  793. smalltalk.method({
  794. selector: "execute",
  795. fn: function (){
  796. var self=this;
  797. return smalltalk.withContext(function($ctx1) {
  798. _st(_st(self)._model())._removeClass();
  799. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveClassCommand)})},
  800. messageSends: ["removeClass", "model"]}),
  801. smalltalk.HLRemoveClassCommand);
  802. smalltalk.addMethod(
  803. smalltalk.method({
  804. selector: "isActive",
  805. fn: function (){
  806. var self=this;
  807. return smalltalk.withContext(function($ctx1) {
  808. var $1;
  809. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  810. return $1;
  811. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveClassCommand)})},
  812. messageSends: ["notNil", "selectedClass", "model"]}),
  813. smalltalk.HLRemoveClassCommand);
  814. smalltalk.addMethod(
  815. smalltalk.method({
  816. selector: "key",
  817. fn: function (){
  818. var self=this;
  819. return smalltalk.withContext(function($ctx1) {
  820. return "c";
  821. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveClassCommand.klass)})},
  822. messageSends: []}),
  823. smalltalk.HLRemoveClassCommand.klass);
  824. smalltalk.addMethod(
  825. smalltalk.method({
  826. selector: "label",
  827. fn: function (){
  828. var self=this;
  829. return smalltalk.withContext(function($ctx1) {
  830. return "Class";
  831. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveClassCommand.klass)})},
  832. messageSends: []}),
  833. smalltalk.HLRemoveClassCommand.klass);
  834. smalltalk.addMethod(
  835. smalltalk.method({
  836. selector: "menuLabel",
  837. fn: function (){
  838. var self=this;
  839. return smalltalk.withContext(function($ctx1) {
  840. return "Remove class";
  841. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveClassCommand.klass)})},
  842. messageSends: []}),
  843. smalltalk.HLRemoveClassCommand.klass);
  844. smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
  845. smalltalk.addMethod(
  846. smalltalk.method({
  847. selector: "category",
  848. fn: function (){
  849. var self=this;
  850. return smalltalk.withContext(function($ctx1) {
  851. return "Methods";
  852. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveMethodCommand)})},
  853. messageSends: []}),
  854. smalltalk.HLRemoveMethodCommand);
  855. smalltalk.addMethod(
  856. smalltalk.method({
  857. selector: "execute",
  858. fn: function (){
  859. var self=this;
  860. return smalltalk.withContext(function($ctx1) {
  861. _st(_st(self)._model())._removeMethod();
  862. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveMethodCommand)})},
  863. messageSends: ["removeMethod", "model"]}),
  864. smalltalk.HLRemoveMethodCommand);
  865. smalltalk.addMethod(
  866. smalltalk.method({
  867. selector: "isActive",
  868. fn: function (){
  869. var self=this;
  870. return smalltalk.withContext(function($ctx1) {
  871. var $1;
  872. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  873. return $1;
  874. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveMethodCommand)})},
  875. messageSends: ["notNil", "selectedMethod", "model"]}),
  876. smalltalk.HLRemoveMethodCommand);
  877. smalltalk.addMethod(
  878. smalltalk.method({
  879. selector: "key",
  880. fn: function (){
  881. var self=this;
  882. return smalltalk.withContext(function($ctx1) {
  883. return "m";
  884. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})},
  885. messageSends: []}),
  886. smalltalk.HLRemoveMethodCommand.klass);
  887. smalltalk.addMethod(
  888. smalltalk.method({
  889. selector: "label",
  890. fn: function (){
  891. var self=this;
  892. return smalltalk.withContext(function($ctx1) {
  893. return "Method";
  894. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})},
  895. messageSends: []}),
  896. smalltalk.HLRemoveMethodCommand.klass);
  897. smalltalk.addMethod(
  898. smalltalk.method({
  899. selector: "menuLabel",
  900. fn: function (){
  901. var self=this;
  902. return smalltalk.withContext(function($ctx1) {
  903. return "Remove method";
  904. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveMethodCommand.klass)})},
  905. messageSends: []}),
  906. smalltalk.HLRemoveMethodCommand.klass);
  907. smalltalk.addClass('HLRemoveProtocolCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Tools');
  908. smalltalk.addMethod(
  909. smalltalk.method({
  910. selector: "category",
  911. fn: function (){
  912. var self=this;
  913. return smalltalk.withContext(function($ctx1) {
  914. return "Protocols";
  915. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveProtocolCommand)})},
  916. messageSends: []}),
  917. smalltalk.HLRemoveProtocolCommand);
  918. smalltalk.addMethod(
  919. smalltalk.method({
  920. selector: "execute",
  921. fn: function (){
  922. var self=this;
  923. return smalltalk.withContext(function($ctx1) {
  924. _st(_st(self)._model())._removeProtocol();
  925. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveProtocolCommand)})},
  926. messageSends: ["removeProtocol", "model"]}),
  927. smalltalk.HLRemoveProtocolCommand);
  928. smalltalk.addMethod(
  929. smalltalk.method({
  930. selector: "isActive",
  931. fn: function (){
  932. var self=this;
  933. return smalltalk.withContext(function($ctx1) {
  934. var $1;
  935. $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
  936. return $1;
  937. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveProtocolCommand)})},
  938. messageSends: ["notNil", "selectedProtocol", "model"]}),
  939. smalltalk.HLRemoveProtocolCommand);
  940. smalltalk.addMethod(
  941. smalltalk.method({
  942. selector: "key",
  943. fn: function (){
  944. var self=this;
  945. return smalltalk.withContext(function($ctx1) {
  946. return "t";
  947. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  948. messageSends: []}),
  949. smalltalk.HLRemoveProtocolCommand.klass);
  950. smalltalk.addMethod(
  951. smalltalk.method({
  952. selector: "label",
  953. fn: function (){
  954. var self=this;
  955. return smalltalk.withContext(function($ctx1) {
  956. return "Protocol";
  957. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  958. messageSends: []}),
  959. smalltalk.HLRemoveProtocolCommand.klass);
  960. smalltalk.addMethod(
  961. smalltalk.method({
  962. selector: "menuLabel",
  963. fn: function (){
  964. var self=this;
  965. return smalltalk.withContext(function($ctx1) {
  966. return "Remove protocol";
  967. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  968. messageSends: []}),
  969. smalltalk.HLRemoveProtocolCommand.klass);
  970. smalltalk.addClass('HLRenameCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Tools');
  971. smalltalk.addMethod(
  972. smalltalk.method({
  973. selector: "key",
  974. fn: function (){
  975. var self=this;
  976. return smalltalk.withContext(function($ctx1) {
  977. return "r";
  978. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameCommand.klass)})},
  979. messageSends: []}),
  980. smalltalk.HLRenameCommand.klass);
  981. smalltalk.addMethod(
  982. smalltalk.method({
  983. selector: "label",
  984. fn: function (){
  985. var self=this;
  986. return smalltalk.withContext(function($ctx1) {
  987. return "Rename";
  988. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameCommand.klass)})},
  989. messageSends: []}),
  990. smalltalk.HLRenameCommand.klass);
  991. smalltalk.addClass('HLRenameClassCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Tools');
  992. smalltalk.addMethod(
  993. smalltalk.method({
  994. selector: "category",
  995. fn: function (){
  996. var self=this;
  997. return smalltalk.withContext(function($ctx1) {
  998. return "Classes";
  999. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameClassCommand)})},
  1000. messageSends: []}),
  1001. smalltalk.HLRenameClassCommand);
  1002. smalltalk.addMethod(
  1003. smalltalk.method({
  1004. selector: "defaultInput",
  1005. fn: function (){
  1006. var self=this;
  1007. return smalltalk.withContext(function($ctx1) {
  1008. var $1;
  1009. $1=_st(_st(_st(self)._model())._selectedClass())._name();
  1010. return $1;
  1011. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameClassCommand)})},
  1012. messageSends: ["name", "selectedClass", "model"]}),
  1013. smalltalk.HLRenameClassCommand);
  1014. smalltalk.addMethod(
  1015. smalltalk.method({
  1016. selector: "displayLabel",
  1017. fn: function (){
  1018. var self=this;
  1019. return smalltalk.withContext(function($ctx1) {
  1020. return "Rename class to:";
  1021. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameClassCommand)})},
  1022. messageSends: []}),
  1023. smalltalk.HLRenameClassCommand);
  1024. smalltalk.addMethod(
  1025. smalltalk.method({
  1026. selector: "execute",
  1027. fn: function (){
  1028. var self=this;
  1029. return smalltalk.withContext(function($ctx1) {
  1030. _st(_st(self)._model())._renameClassTo_(_st(self)._input());
  1031. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameClassCommand)})},
  1032. messageSends: ["renameClassTo:", "input", "model"]}),
  1033. smalltalk.HLRenameClassCommand);
  1034. smalltalk.addMethod(
  1035. smalltalk.method({
  1036. selector: "isActive",
  1037. fn: function (){
  1038. var self=this;
  1039. return smalltalk.withContext(function($ctx1) {
  1040. var $1;
  1041. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  1042. return $1;
  1043. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameClassCommand)})},
  1044. messageSends: ["notNil", "selectedClass", "model"]}),
  1045. smalltalk.HLRenameClassCommand);
  1046. smalltalk.addMethod(
  1047. smalltalk.method({
  1048. selector: "isInputRequired",
  1049. fn: function (){
  1050. var self=this;
  1051. return smalltalk.withContext(function($ctx1) {
  1052. return true;
  1053. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameClassCommand)})},
  1054. messageSends: []}),
  1055. smalltalk.HLRenameClassCommand);
  1056. smalltalk.addMethod(
  1057. smalltalk.method({
  1058. selector: "key",
  1059. fn: function (){
  1060. var self=this;
  1061. return smalltalk.withContext(function($ctx1) {
  1062. return "c";
  1063. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameClassCommand.klass)})},
  1064. messageSends: []}),
  1065. smalltalk.HLRenameClassCommand.klass);
  1066. smalltalk.addMethod(
  1067. smalltalk.method({
  1068. selector: "label",
  1069. fn: function (){
  1070. var self=this;
  1071. return smalltalk.withContext(function($ctx1) {
  1072. return "Class";
  1073. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameClassCommand.klass)})},
  1074. messageSends: []}),
  1075. smalltalk.HLRenameClassCommand.klass);
  1076. smalltalk.addMethod(
  1077. smalltalk.method({
  1078. selector: "menuLabel",
  1079. fn: function (){
  1080. var self=this;
  1081. return smalltalk.withContext(function($ctx1) {
  1082. return "Rename class...";
  1083. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameClassCommand.klass)})},
  1084. messageSends: []}),
  1085. smalltalk.HLRenameClassCommand.klass);
  1086. smalltalk.addClass('HLRenameProtocolCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Tools');
  1087. smalltalk.addMethod(
  1088. smalltalk.method({
  1089. selector: "category",
  1090. fn: function (){
  1091. var self=this;
  1092. return smalltalk.withContext(function($ctx1) {
  1093. return "Protocols";
  1094. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameProtocolCommand)})},
  1095. messageSends: []}),
  1096. smalltalk.HLRenameProtocolCommand);
  1097. smalltalk.addMethod(
  1098. smalltalk.method({
  1099. selector: "defaultInput",
  1100. fn: function (){
  1101. var self=this;
  1102. return smalltalk.withContext(function($ctx1) {
  1103. var $1;
  1104. $1=_st(_st(self)._model())._selectedProtocol();
  1105. return $1;
  1106. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameProtocolCommand)})},
  1107. messageSends: ["selectedProtocol", "model"]}),
  1108. smalltalk.HLRenameProtocolCommand);
  1109. smalltalk.addMethod(
  1110. smalltalk.method({
  1111. selector: "displayLabel",
  1112. fn: function (){
  1113. var self=this;
  1114. return smalltalk.withContext(function($ctx1) {
  1115. return "Rename protocol to:";
  1116. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameProtocolCommand)})},
  1117. messageSends: []}),
  1118. smalltalk.HLRenameProtocolCommand);
  1119. smalltalk.addMethod(
  1120. smalltalk.method({
  1121. selector: "execute",
  1122. fn: function (){
  1123. var self=this;
  1124. return smalltalk.withContext(function($ctx1) {
  1125. _st(_st(self)._model())._renameProtocolTo_(_st(self)._input());
  1126. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameProtocolCommand)})},
  1127. messageSends: ["renameProtocolTo:", "input", "model"]}),
  1128. smalltalk.HLRenameProtocolCommand);
  1129. smalltalk.addMethod(
  1130. smalltalk.method({
  1131. selector: "isActive",
  1132. fn: function (){
  1133. var self=this;
  1134. return smalltalk.withContext(function($ctx1) {
  1135. var $1;
  1136. $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
  1137. return $1;
  1138. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameProtocolCommand)})},
  1139. messageSends: ["notNil", "selectedProtocol", "model"]}),
  1140. smalltalk.HLRenameProtocolCommand);
  1141. smalltalk.addMethod(
  1142. smalltalk.method({
  1143. selector: "isInputRequired",
  1144. fn: function (){
  1145. var self=this;
  1146. return smalltalk.withContext(function($ctx1) {
  1147. return true;
  1148. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameProtocolCommand)})},
  1149. messageSends: []}),
  1150. smalltalk.HLRenameProtocolCommand);
  1151. smalltalk.addMethod(
  1152. smalltalk.method({
  1153. selector: "key",
  1154. fn: function (){
  1155. var self=this;
  1156. return smalltalk.withContext(function($ctx1) {
  1157. return "t";
  1158. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1159. messageSends: []}),
  1160. smalltalk.HLRenameProtocolCommand.klass);
  1161. smalltalk.addMethod(
  1162. smalltalk.method({
  1163. selector: "label",
  1164. fn: function (){
  1165. var self=this;
  1166. return smalltalk.withContext(function($ctx1) {
  1167. return "Protocol";
  1168. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1169. messageSends: []}),
  1170. smalltalk.HLRenameProtocolCommand.klass);
  1171. smalltalk.addMethod(
  1172. smalltalk.method({
  1173. selector: "menuLabel",
  1174. fn: function (){
  1175. var self=this;
  1176. return smalltalk.withContext(function($ctx1) {
  1177. return "Rename protocol...";
  1178. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1179. messageSends: []}),
  1180. smalltalk.HLRenameProtocolCommand.klass);