Helios-Commands-Browser.deploy.js 39 KB

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