Helios-Commands-Browser.deploy.js 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479
  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('HLMoveToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  195. smalltalk.addMethod(
  196. "_key",
  197. smalltalk.method({
  198. selector: "key",
  199. fn: function (){
  200. var self=this;
  201. return smalltalk.withContext(function($ctx1) { return (77);
  202. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  203. messageSends: []}),
  204. smalltalk.HLMoveToCommand.klass);
  205. smalltalk.addMethod(
  206. "_label",
  207. smalltalk.method({
  208. selector: "label",
  209. fn: function (){
  210. var self=this;
  211. return smalltalk.withContext(function($ctx1) { return "Move";
  212. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  213. messageSends: []}),
  214. smalltalk.HLMoveToCommand.klass);
  215. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser');
  216. smalltalk.addMethod(
  217. "_isActive",
  218. smalltalk.method({
  219. selector: "isActive",
  220. fn: function (){
  221. var self=this;
  222. return smalltalk.withContext(function($ctx1) { var $1;
  223. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  224. return $1;
  225. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
  226. messageSends: ["notNil", "selectedMethod", "model"]}),
  227. smalltalk.HLMoveMethodToCommand);
  228. smalltalk.addMethod(
  229. "_key",
  230. smalltalk.method({
  231. selector: "key",
  232. fn: function (){
  233. var self=this;
  234. return smalltalk.withContext(function($ctx1) { return (77);
  235. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  236. messageSends: []}),
  237. smalltalk.HLMoveMethodToCommand.klass);
  238. smalltalk.addMethod(
  239. "_label",
  240. smalltalk.method({
  241. selector: "label",
  242. fn: function (){
  243. var self=this;
  244. return smalltalk.withContext(function($ctx1) { return "Method";
  245. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  246. messageSends: []}),
  247. smalltalk.HLMoveMethodToCommand.klass);
  248. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  249. smalltalk.addMethod(
  250. "_execute",
  251. smalltalk.method({
  252. selector: "execute",
  253. fn: function (){
  254. var self=this;
  255. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._moveMethodToClass_ifAbsent_(_st(self)._input(),_st(self)._errorBlock());
  256. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  257. messageSends: ["moveMethodToClass:ifAbsent:", "input", "errorBlock", "model"]}),
  258. smalltalk.HLMoveMethodToClassCommand);
  259. smalltalk.addMethod(
  260. "_inputLabel",
  261. smalltalk.method({
  262. selector: "inputLabel",
  263. fn: function (){
  264. var self=this;
  265. return smalltalk.withContext(function($ctx1) { return "Move method to class:";
  266. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  267. messageSends: []}),
  268. smalltalk.HLMoveMethodToClassCommand);
  269. smalltalk.addMethod(
  270. "_isInputRequired",
  271. smalltalk.method({
  272. selector: "isInputRequired",
  273. fn: function (){
  274. var self=this;
  275. return smalltalk.withContext(function($ctx1) { return true;
  276. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
  277. messageSends: []}),
  278. smalltalk.HLMoveMethodToClassCommand);
  279. smalltalk.addMethod(
  280. "_key",
  281. smalltalk.method({
  282. selector: "key",
  283. fn: function (){
  284. var self=this;
  285. return smalltalk.withContext(function($ctx1) { return (67);
  286. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  287. messageSends: []}),
  288. smalltalk.HLMoveMethodToClassCommand.klass);
  289. smalltalk.addMethod(
  290. "_label",
  291. smalltalk.method({
  292. selector: "label",
  293. fn: function (){
  294. var self=this;
  295. return smalltalk.withContext(function($ctx1) { return "to class";
  296. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  297. messageSends: []}),
  298. smalltalk.HLMoveMethodToClassCommand.klass);
  299. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  300. smalltalk.addMethod(
  301. "_execute",
  302. smalltalk.method({
  303. selector: "execute",
  304. fn: function (){
  305. var self=this;
  306. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._moveMethodToProtocol();
  307. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  308. messageSends: ["moveMethodToProtocol", "model"]}),
  309. smalltalk.HLMoveMethodToProtocolCommand);
  310. smalltalk.addMethod(
  311. "_key",
  312. smalltalk.method({
  313. selector: "key",
  314. fn: function (){
  315. var self=this;
  316. return smalltalk.withContext(function($ctx1) { return (84);
  317. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  318. messageSends: []}),
  319. smalltalk.HLMoveMethodToProtocolCommand.klass);
  320. smalltalk.addMethod(
  321. "_label",
  322. smalltalk.method({
  323. selector: "label",
  324. fn: function (){
  325. var self=this;
  326. return smalltalk.withContext(function($ctx1) { return "to protocol";
  327. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  328. messageSends: []}),
  329. smalltalk.HLMoveMethodToProtocolCommand.klass);
  330. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  331. smalltalk.addMethod(
  332. "_key",
  333. smalltalk.method({
  334. selector: "key",
  335. fn: function (){
  336. var self=this;
  337. return smalltalk.withContext(function($ctx1) { return (84);
  338. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
  339. messageSends: []}),
  340. smalltalk.HLToggleCommand.klass);
  341. smalltalk.addMethod(
  342. "_label",
  343. smalltalk.method({
  344. selector: "label",
  345. fn: function (){
  346. var self=this;
  347. return smalltalk.withContext(function($ctx1) { return "Toggle";
  348. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
  349. messageSends: []}),
  350. smalltalk.HLToggleCommand.klass);
  351. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  352. smalltalk.addMethod(
  353. "_execute",
  354. smalltalk.method({
  355. selector: "execute",
  356. fn: function (){
  357. var self=this;
  358. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(false);
  359. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
  360. messageSends: ["showInstance:", "model"]}),
  361. smalltalk.HLToggleClassSideCommand);
  362. smalltalk.addMethod(
  363. "_key",
  364. smalltalk.method({
  365. selector: "key",
  366. fn: function (){
  367. var self=this;
  368. return smalltalk.withContext(function($ctx1) { return (67);
  369. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
  370. messageSends: []}),
  371. smalltalk.HLToggleClassSideCommand.klass);
  372. smalltalk.addMethod(
  373. "_label",
  374. smalltalk.method({
  375. selector: "label",
  376. fn: function (){
  377. var self=this;
  378. return smalltalk.withContext(function($ctx1) { return "Class side";
  379. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
  380. messageSends: []}),
  381. smalltalk.HLToggleClassSideCommand.klass);
  382. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  383. smalltalk.addMethod(
  384. "_execute",
  385. smalltalk.method({
  386. selector: "execute",
  387. fn: function (){
  388. var self=this;
  389. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(true);
  390. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
  391. messageSends: ["showInstance:", "model"]}),
  392. smalltalk.HLToggleInstanceSideCommand);
  393. smalltalk.addMethod(
  394. "_key",
  395. smalltalk.method({
  396. selector: "key",
  397. fn: function (){
  398. var self=this;
  399. return smalltalk.withContext(function($ctx1) { return (73);
  400. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  401. messageSends: []}),
  402. smalltalk.HLToggleInstanceSideCommand.klass);
  403. smalltalk.addMethod(
  404. "_label",
  405. smalltalk.method({
  406. selector: "label",
  407. fn: function (){
  408. var self=this;
  409. return smalltalk.withContext(function($ctx1) { return "Instance side";
  410. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  411. messageSends: []}),
  412. smalltalk.HLToggleInstanceSideCommand.klass);