Helios-Commands-Browser.deploy.js 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777
  1. smalltalk.addPackage('Helios-Commands-Browser');
  2. smalltalk.addClass('HLBrowserCommand', smalltalk.HLModelCommand, [], 'Helios-Commands-Browser');
  3. smalltalk.addMethod(
  4. "_for_",
  5. smalltalk.method({
  6. selector: "for:",
  7. fn: function (aBrowserModel){
  8. var self=this;
  9. return smalltalk.withContext(function($ctx1) { var $2,$3,$1;
  10. $2=_st(self)._new();
  11. _st($2)._model_(aBrowserModel);
  12. $3=_st($2)._yourself();
  13. $1=$3;
  14. return $1;
  15. }, function($ctx1) {$ctx1.fill(self,"for:",{aBrowserModel:aBrowserModel},smalltalk.HLBrowserCommand.klass)})},
  16. messageSends: ["model:", "new", "yourself"]}),
  17. smalltalk.HLBrowserCommand.klass);
  18. smalltalk.addClass('HLBrowserGoToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  19. smalltalk.addMethod(
  20. "_key",
  21. smalltalk.method({
  22. selector: "key",
  23. fn: function (){
  24. var self=this;
  25. return smalltalk.withContext(function($ctx1) { return (71);
  26. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToCommand.klass)})},
  27. messageSends: []}),
  28. smalltalk.HLBrowserGoToCommand.klass);
  29. smalltalk.addMethod(
  30. "_label",
  31. smalltalk.method({
  32. selector: "label",
  33. fn: function (){
  34. var self=this;
  35. return smalltalk.withContext(function($ctx1) { return "Go to";
  36. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToCommand.klass)})},
  37. messageSends: []}),
  38. smalltalk.HLBrowserGoToCommand.klass);
  39. smalltalk.addClass('HLGoToClassesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  40. smalltalk.addMethod(
  41. "_execute",
  42. smalltalk.method({
  43. selector: "execute",
  44. fn: function (){
  45. var self=this;
  46. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnClasses();
  47. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToClassesCommand)})},
  48. messageSends: ["focusOnClasses", "model"]}),
  49. smalltalk.HLGoToClassesCommand);
  50. smalltalk.addMethod(
  51. "_key",
  52. smalltalk.method({
  53. selector: "key",
  54. fn: function (){
  55. var self=this;
  56. return smalltalk.withContext(function($ctx1) { return (67);
  57. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToClassesCommand.klass)})},
  58. messageSends: []}),
  59. smalltalk.HLGoToClassesCommand.klass);
  60. smalltalk.addMethod(
  61. "_label",
  62. smalltalk.method({
  63. selector: "label",
  64. fn: function (){
  65. var self=this;
  66. return smalltalk.withContext(function($ctx1) { return "Classes";
  67. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToClassesCommand.klass)})},
  68. messageSends: []}),
  69. smalltalk.HLGoToClassesCommand.klass);
  70. smalltalk.addClass('HLGoToMethodsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  71. smalltalk.addMethod(
  72. "_execute",
  73. smalltalk.method({
  74. selector: "execute",
  75. fn: function (){
  76. var self=this;
  77. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnMethods();
  78. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToMethodsCommand)})},
  79. messageSends: ["focusOnMethods", "model"]}),
  80. smalltalk.HLGoToMethodsCommand);
  81. smalltalk.addMethod(
  82. "_key",
  83. smalltalk.method({
  84. selector: "key",
  85. fn: function (){
  86. var self=this;
  87. return smalltalk.withContext(function($ctx1) { return (77);
  88. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToMethodsCommand.klass)})},
  89. messageSends: []}),
  90. smalltalk.HLGoToMethodsCommand.klass);
  91. smalltalk.addMethod(
  92. "_label",
  93. smalltalk.method({
  94. selector: "label",
  95. fn: function (){
  96. var self=this;
  97. return smalltalk.withContext(function($ctx1) { return "Methods";
  98. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToMethodsCommand.klass)})},
  99. messageSends: []}),
  100. smalltalk.HLGoToMethodsCommand.klass);
  101. smalltalk.addClass('HLGoToPackagesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  102. smalltalk.addMethod(
  103. "_execute",
  104. smalltalk.method({
  105. selector: "execute",
  106. fn: function (){
  107. var self=this;
  108. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnPackages();
  109. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToPackagesCommand)})},
  110. messageSends: ["focusOnPackages", "model"]}),
  111. smalltalk.HLGoToPackagesCommand);
  112. smalltalk.addMethod(
  113. "_key",
  114. smalltalk.method({
  115. selector: "key",
  116. fn: function (){
  117. var self=this;
  118. return smalltalk.withContext(function($ctx1) { return (80);
  119. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToPackagesCommand.klass)})},
  120. messageSends: []}),
  121. smalltalk.HLGoToPackagesCommand.klass);
  122. smalltalk.addMethod(
  123. "_label",
  124. smalltalk.method({
  125. selector: "label",
  126. fn: function (){
  127. var self=this;
  128. return smalltalk.withContext(function($ctx1) { return "Packages";
  129. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToPackagesCommand.klass)})},
  130. messageSends: []}),
  131. smalltalk.HLGoToPackagesCommand.klass);
  132. smalltalk.addClass('HLGoToProtocolsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  133. smalltalk.addMethod(
  134. "_execute",
  135. smalltalk.method({
  136. selector: "execute",
  137. fn: function (){
  138. var self=this;
  139. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnProtocols();
  140. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToProtocolsCommand)})},
  141. messageSends: ["focusOnProtocols", "model"]}),
  142. smalltalk.HLGoToProtocolsCommand);
  143. smalltalk.addMethod(
  144. "_key",
  145. smalltalk.method({
  146. selector: "key",
  147. fn: function (){
  148. var self=this;
  149. return smalltalk.withContext(function($ctx1) { return (84);
  150. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToProtocolsCommand.klass)})},
  151. messageSends: []}),
  152. smalltalk.HLGoToProtocolsCommand.klass);
  153. smalltalk.addMethod(
  154. "_label",
  155. smalltalk.method({
  156. selector: "label",
  157. fn: function (){
  158. var self=this;
  159. return smalltalk.withContext(function($ctx1) { return "Protocols";
  160. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToProtocolsCommand.klass)})},
  161. messageSends: []}),
  162. smalltalk.HLGoToProtocolsCommand.klass);
  163. smalltalk.addClass('HLGoToSourceCodeCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  164. smalltalk.addMethod(
  165. "_execute",
  166. smalltalk.method({
  167. selector: "execute",
  168. fn: function (){
  169. var self=this;
  170. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnSourceCode();
  171. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToSourceCodeCommand)})},
  172. messageSends: ["focusOnSourceCode", "model"]}),
  173. smalltalk.HLGoToSourceCodeCommand);
  174. smalltalk.addMethod(
  175. "_key",
  176. smalltalk.method({
  177. selector: "key",
  178. fn: function (){
  179. var self=this;
  180. return smalltalk.withContext(function($ctx1) { return (83);
  181. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  182. messageSends: []}),
  183. smalltalk.HLGoToSourceCodeCommand.klass);
  184. smalltalk.addMethod(
  185. "_label",
  186. smalltalk.method({
  187. selector: "label",
  188. fn: function (){
  189. var self=this;
  190. return smalltalk.withContext(function($ctx1) { return "Source code";
  191. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  192. messageSends: []}),
  193. smalltalk.HLGoToSourceCodeCommand.klass);
  194. smalltalk.addClass('HLCommitPackageCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  195. smalltalk.addMethod(
  196. "_execute",
  197. smalltalk.method({
  198. selector: "execute",
  199. fn: function (){
  200. var self=this;
  201. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._commitPackage();
  202. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCommitPackageCommand)})},
  203. messageSends: ["commitPackage", "model"]}),
  204. smalltalk.HLCommitPackageCommand);
  205. smalltalk.addMethod(
  206. "_isActive",
  207. smalltalk.method({
  208. selector: "isActive",
  209. fn: function (){
  210. var self=this;
  211. return smalltalk.withContext(function($ctx1) { return true;
  212. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCommitPackageCommand)})},
  213. messageSends: []}),
  214. smalltalk.HLCommitPackageCommand);
  215. smalltalk.addMethod(
  216. "_key",
  217. smalltalk.method({
  218. selector: "key",
  219. fn: function (){
  220. var self=this;
  221. return smalltalk.withContext(function($ctx1) { return (75);
  222. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCommitPackageCommand.klass)})},
  223. messageSends: []}),
  224. smalltalk.HLCommitPackageCommand.klass);
  225. smalltalk.addMethod(
  226. "_label",
  227. smalltalk.method({
  228. selector: "label",
  229. fn: function (){
  230. var self=this;
  231. return smalltalk.withContext(function($ctx1) { return "Commit package";
  232. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCommitPackageCommand.klass)})},
  233. messageSends: []}),
  234. smalltalk.HLCommitPackageCommand.klass);
  235. smalltalk.addClass('HLFindCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  236. smalltalk.addMethod(
  237. "_key",
  238. smalltalk.method({
  239. selector: "key",
  240. fn: function (){
  241. var self=this;
  242. return smalltalk.withContext(function($ctx1) { return (70);
  243. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindCommand.klass)})},
  244. messageSends: []}),
  245. smalltalk.HLFindCommand.klass);
  246. smalltalk.addMethod(
  247. "_label",
  248. smalltalk.method({
  249. selector: "label",
  250. fn: function (){
  251. var self=this;
  252. return smalltalk.withContext(function($ctx1) { return "Find";
  253. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindCommand.klass)})},
  254. messageSends: []}),
  255. smalltalk.HLFindCommand.klass);
  256. smalltalk.addClass('HLFindClassCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Browser');
  257. smalltalk.addMethod(
  258. "_displayLabel",
  259. smalltalk.method({
  260. selector: "displayLabel",
  261. fn: function (){
  262. var self=this;
  263. return smalltalk.withContext(function($ctx1) { return "select a class";
  264. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindClassCommand)})},
  265. messageSends: []}),
  266. smalltalk.HLFindClassCommand);
  267. smalltalk.addMethod(
  268. "_execute",
  269. smalltalk.method({
  270. selector: "execute",
  271. fn: function (){
  272. var self=this;
  273. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._openClassNamed_(_st(self)._input());
  274. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindClassCommand)})},
  275. messageSends: ["openClassNamed:", "input", "model"]}),
  276. smalltalk.HLFindClassCommand);
  277. smalltalk.addMethod(
  278. "_inputCompletion",
  279. smalltalk.method({
  280. selector: "inputCompletion",
  281. fn: function (){
  282. var self=this;
  283. return smalltalk.withContext(function($ctx1) { var $1;
  284. $1=_st(_st(self)._model())._availableClassNames();
  285. return $1;
  286. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindClassCommand)})},
  287. messageSends: ["availableClassNames", "model"]}),
  288. smalltalk.HLFindClassCommand);
  289. smalltalk.addMethod(
  290. "_inputLabel",
  291. smalltalk.method({
  292. selector: "inputLabel",
  293. fn: function (){
  294. var self=this;
  295. return smalltalk.withContext(function($ctx1) { return "Find a class";
  296. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindClassCommand)})},
  297. messageSends: []}),
  298. smalltalk.HLFindClassCommand);
  299. smalltalk.addMethod(
  300. "_isInputRequired",
  301. smalltalk.method({
  302. selector: "isInputRequired",
  303. fn: function (){
  304. var self=this;
  305. return smalltalk.withContext(function($ctx1) { return true;
  306. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindClassCommand)})},
  307. messageSends: []}),
  308. smalltalk.HLFindClassCommand);
  309. smalltalk.addMethod(
  310. "_key",
  311. smalltalk.method({
  312. selector: "key",
  313. fn: function (){
  314. var self=this;
  315. return smalltalk.withContext(function($ctx1) { return (67);
  316. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})},
  317. messageSends: []}),
  318. smalltalk.HLFindClassCommand.klass);
  319. smalltalk.addMethod(
  320. "_label",
  321. smalltalk.method({
  322. selector: "label",
  323. fn: function (){
  324. var self=this;
  325. return smalltalk.withContext(function($ctx1) { return "Class";
  326. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})},
  327. messageSends: []}),
  328. smalltalk.HLFindClassCommand.klass);
  329. smalltalk.addClass('HLMoveToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  330. smalltalk.addMethod(
  331. "_key",
  332. smalltalk.method({
  333. selector: "key",
  334. fn: function (){
  335. var self=this;
  336. return smalltalk.withContext(function($ctx1) { return (77);
  337. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  338. messageSends: []}),
  339. smalltalk.HLMoveToCommand.klass);
  340. smalltalk.addMethod(
  341. "_label",
  342. smalltalk.method({
  343. selector: "label",
  344. fn: function (){
  345. var self=this;
  346. return smalltalk.withContext(function($ctx1) { return "Move";
  347. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  348. messageSends: []}),
  349. smalltalk.HLMoveToCommand.klass);
  350. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser');
  351. smalltalk.addMethod(
  352. "_isActive",
  353. smalltalk.method({
  354. selector: "isActive",
  355. fn: function (){
  356. var self=this;
  357. return smalltalk.withContext(function($ctx1) { var $1;
  358. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  359. return $1;
  360. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
  361. messageSends: ["notNil", "selectedMethod", "model"]}),
  362. smalltalk.HLMoveMethodToCommand);
  363. smalltalk.addMethod(
  364. "_key",
  365. smalltalk.method({
  366. selector: "key",
  367. fn: function (){
  368. var self=this;
  369. return smalltalk.withContext(function($ctx1) { return (77);
  370. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  371. messageSends: []}),
  372. smalltalk.HLMoveMethodToCommand.klass);
  373. smalltalk.addMethod(
  374. "_label",
  375. smalltalk.method({
  376. selector: "label",
  377. fn: function (){
  378. var self=this;
  379. return smalltalk.withContext(function($ctx1) { return "Method";
  380. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  381. messageSends: []}),
  382. smalltalk.HLMoveMethodToCommand.klass);
  383. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  384. smalltalk.addMethod(
  385. "_displayLabel",
  386. smalltalk.method({
  387. selector: "displayLabel",
  388. fn: function (){
  389. var self=this;
  390. return smalltalk.withContext(function($ctx1) { return "select a class";
  391. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  392. messageSends: []}),
  393. smalltalk.HLMoveMethodToClassCommand);
  394. smalltalk.addMethod(
  395. "_execute",
  396. smalltalk.method({
  397. selector: "execute",
  398. fn: function (){
  399. var self=this;
  400. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._moveMethodToClass_(_st(self)._input());
  401. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  402. messageSends: ["moveMethodToClass:", "input", "model"]}),
  403. smalltalk.HLMoveMethodToClassCommand);
  404. smalltalk.addMethod(
  405. "_inputCompletion",
  406. smalltalk.method({
  407. selector: "inputCompletion",
  408. fn: function (){
  409. var self=this;
  410. return smalltalk.withContext(function($ctx1) { var $1;
  411. $1=_st(_st(self)._model())._availableClassNames();
  412. return $1;
  413. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToClassCommand)})},
  414. messageSends: ["availableClassNames", "model"]}),
  415. smalltalk.HLMoveMethodToClassCommand);
  416. smalltalk.addMethod(
  417. "_inputLabel",
  418. smalltalk.method({
  419. selector: "inputLabel",
  420. fn: function (){
  421. var self=this;
  422. return smalltalk.withContext(function($ctx1) { return "Move method to class:";
  423. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  424. messageSends: []}),
  425. smalltalk.HLMoveMethodToClassCommand);
  426. smalltalk.addMethod(
  427. "_isInputRequired",
  428. smalltalk.method({
  429. selector: "isInputRequired",
  430. fn: function (){
  431. var self=this;
  432. return smalltalk.withContext(function($ctx1) { return true;
  433. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
  434. messageSends: []}),
  435. smalltalk.HLMoveMethodToClassCommand);
  436. smalltalk.addMethod(
  437. "_key",
  438. smalltalk.method({
  439. selector: "key",
  440. fn: function (){
  441. var self=this;
  442. return smalltalk.withContext(function($ctx1) { return (67);
  443. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  444. messageSends: []}),
  445. smalltalk.HLMoveMethodToClassCommand.klass);
  446. smalltalk.addMethod(
  447. "_label",
  448. smalltalk.method({
  449. selector: "label",
  450. fn: function (){
  451. var self=this;
  452. return smalltalk.withContext(function($ctx1) { return "to class";
  453. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  454. messageSends: []}),
  455. smalltalk.HLMoveMethodToClassCommand.klass);
  456. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  457. smalltalk.addMethod(
  458. "_displayLabel",
  459. smalltalk.method({
  460. selector: "displayLabel",
  461. fn: function (){
  462. var self=this;
  463. return smalltalk.withContext(function($ctx1) { return "select a protocol";
  464. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  465. messageSends: []}),
  466. smalltalk.HLMoveMethodToProtocolCommand);
  467. smalltalk.addMethod(
  468. "_execute",
  469. smalltalk.method({
  470. selector: "execute",
  471. fn: function (){
  472. var self=this;
  473. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._moveMethodToProtocol_(_st(self)._input());
  474. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  475. messageSends: ["moveMethodToProtocol:", "input", "model"]}),
  476. smalltalk.HLMoveMethodToProtocolCommand);
  477. smalltalk.addMethod(
  478. "_inputCompletion",
  479. smalltalk.method({
  480. selector: "inputCompletion",
  481. fn: function (){
  482. var self=this;
  483. return smalltalk.withContext(function($ctx1) { var $1;
  484. $1=_st(_st(self)._model())._availableProtocols();
  485. return $1;
  486. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  487. messageSends: ["availableProtocols", "model"]}),
  488. smalltalk.HLMoveMethodToProtocolCommand);
  489. smalltalk.addMethod(
  490. "_inputLabel",
  491. smalltalk.method({
  492. selector: "inputLabel",
  493. fn: function (){
  494. var self=this;
  495. return smalltalk.withContext(function($ctx1) { return "Move method to a protocol:";
  496. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  497. messageSends: []}),
  498. smalltalk.HLMoveMethodToProtocolCommand);
  499. smalltalk.addMethod(
  500. "_isInputRequired",
  501. smalltalk.method({
  502. selector: "isInputRequired",
  503. fn: function (){
  504. var self=this;
  505. return smalltalk.withContext(function($ctx1) { return true;
  506. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  507. messageSends: []}),
  508. smalltalk.HLMoveMethodToProtocolCommand);
  509. smalltalk.addMethod(
  510. "_key",
  511. smalltalk.method({
  512. selector: "key",
  513. fn: function (){
  514. var self=this;
  515. return smalltalk.withContext(function($ctx1) { return (84);
  516. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  517. messageSends: []}),
  518. smalltalk.HLMoveMethodToProtocolCommand.klass);
  519. smalltalk.addMethod(
  520. "_label",
  521. smalltalk.method({
  522. selector: "label",
  523. fn: function (){
  524. var self=this;
  525. return smalltalk.withContext(function($ctx1) { return "to protocol";
  526. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  527. messageSends: []}),
  528. smalltalk.HLMoveMethodToProtocolCommand.klass);
  529. smalltalk.addClass('HLRemoveCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  530. smalltalk.addMethod(
  531. "_key",
  532. smalltalk.method({
  533. selector: "key",
  534. fn: function (){
  535. var self=this;
  536. return smalltalk.withContext(function($ctx1) { return (88);
  537. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})},
  538. messageSends: []}),
  539. smalltalk.HLRemoveCommand.klass);
  540. smalltalk.addMethod(
  541. "_label",
  542. smalltalk.method({
  543. selector: "label",
  544. fn: function (){
  545. var self=this;
  546. return smalltalk.withContext(function($ctx1) { return "Remove";
  547. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})},
  548. messageSends: []}),
  549. smalltalk.HLRemoveCommand.klass);
  550. smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser');
  551. smalltalk.addMethod(
  552. "_execute",
  553. smalltalk.method({
  554. selector: "execute",
  555. fn: function (){
  556. var self=this;
  557. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._removeMethod();
  558. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveMethodCommand)})},
  559. messageSends: ["removeMethod", "model"]}),
  560. smalltalk.HLRemoveMethodCommand);
  561. smalltalk.addMethod(
  562. "_isActive",
  563. smalltalk.method({
  564. selector: "isActive",
  565. fn: function (){
  566. var self=this;
  567. return smalltalk.withContext(function($ctx1) { var $1;
  568. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  569. return $1;
  570. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveMethodCommand)})},
  571. messageSends: ["notNil", "selectedMethod", "model"]}),
  572. smalltalk.HLRemoveMethodCommand);
  573. smalltalk.addMethod(
  574. "_key",
  575. smalltalk.method({
  576. selector: "key",
  577. fn: function (){
  578. var self=this;
  579. return smalltalk.withContext(function($ctx1) { return (77);
  580. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})},
  581. messageSends: []}),
  582. smalltalk.HLRemoveMethodCommand.klass);
  583. smalltalk.addMethod(
  584. "_label",
  585. smalltalk.method({
  586. selector: "label",
  587. fn: function (){
  588. var self=this;
  589. return smalltalk.withContext(function($ctx1) { return "Method";
  590. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})},
  591. messageSends: []}),
  592. smalltalk.HLRemoveMethodCommand.klass);
  593. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  594. smalltalk.addMethod(
  595. "_key",
  596. smalltalk.method({
  597. selector: "key",
  598. fn: function (){
  599. var self=this;
  600. return smalltalk.withContext(function($ctx1) { return (84);
  601. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
  602. messageSends: []}),
  603. smalltalk.HLToggleCommand.klass);
  604. smalltalk.addMethod(
  605. "_label",
  606. smalltalk.method({
  607. selector: "label",
  608. fn: function (){
  609. var self=this;
  610. return smalltalk.withContext(function($ctx1) { return "Toggle";
  611. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
  612. messageSends: []}),
  613. smalltalk.HLToggleCommand.klass);
  614. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  615. smalltalk.addMethod(
  616. "_execute",
  617. smalltalk.method({
  618. selector: "execute",
  619. fn: function (){
  620. var self=this;
  621. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(false);
  622. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
  623. messageSends: ["showInstance:", "model"]}),
  624. smalltalk.HLToggleClassSideCommand);
  625. smalltalk.addMethod(
  626. "_key",
  627. smalltalk.method({
  628. selector: "key",
  629. fn: function (){
  630. var self=this;
  631. return smalltalk.withContext(function($ctx1) { return (67);
  632. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
  633. messageSends: []}),
  634. smalltalk.HLToggleClassSideCommand.klass);
  635. smalltalk.addMethod(
  636. "_label",
  637. smalltalk.method({
  638. selector: "label",
  639. fn: function (){
  640. var self=this;
  641. return smalltalk.withContext(function($ctx1) { return "Class side";
  642. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
  643. messageSends: []}),
  644. smalltalk.HLToggleClassSideCommand.klass);
  645. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  646. smalltalk.addMethod(
  647. "_execute",
  648. smalltalk.method({
  649. selector: "execute",
  650. fn: function (){
  651. var self=this;
  652. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(true);
  653. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
  654. messageSends: ["showInstance:", "model"]}),
  655. smalltalk.HLToggleInstanceSideCommand);
  656. smalltalk.addMethod(
  657. "_key",
  658. smalltalk.method({
  659. selector: "key",
  660. fn: function (){
  661. var self=this;
  662. return smalltalk.withContext(function($ctx1) { return (73);
  663. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  664. messageSends: []}),
  665. smalltalk.HLToggleInstanceSideCommand.klass);
  666. smalltalk.addMethod(
  667. "_label",
  668. smalltalk.method({
  669. selector: "label",
  670. fn: function (){
  671. var self=this;
  672. return smalltalk.withContext(function($ctx1) { return "Instance side";
  673. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  674. messageSends: []}),
  675. smalltalk.HLToggleInstanceSideCommand.klass);