1
0

Helios-Commands.deploy.js 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613
  1. smalltalk.addPackage('Helios-Commands');
  2. smalltalk.addClass('HLCommand', smalltalk.Object, [], 'Helios-Commands');
  3. smalltalk.addMethod(
  4. "_asBinding",
  5. smalltalk.method({
  6. selector: "asBinding",
  7. fn: function (){
  8. var self=this;
  9. return smalltalk.withContext(function($ctx1) { var $1;
  10. $1=_st(_st((smalltalk.HLBindingAction || HLBindingAction))._on_labelled_(_st(self)._key(),_st(self)._label()))._callback_((function(){
  11. return smalltalk.withContext(function($ctx2) { return _st(self)._execute();
  12. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
  13. return $1;
  14. }, function($ctx1) {$ctx1.fill(self,"asBinding",{}, smalltalk.HLCommand)})},
  15. messageSends: ["callback:", "execute", "on:labelled:", "key", "label"]}),
  16. smalltalk.HLCommand);
  17. smalltalk.addMethod(
  18. "_documentation",
  19. smalltalk.method({
  20. selector: "documentation",
  21. fn: function (){
  22. var self=this;
  23. return smalltalk.withContext(function($ctx1) { var $1;
  24. $1=_st(_st(self)._class())._documentation();
  25. return $1;
  26. }, function($ctx1) {$ctx1.fill(self,"documentation",{}, smalltalk.HLCommand)})},
  27. messageSends: ["documentation", "class"]}),
  28. smalltalk.HLCommand);
  29. smalltalk.addMethod(
  30. "_execute",
  31. smalltalk.method({
  32. selector: "execute",
  33. fn: function (){
  34. var self=this;
  35. return smalltalk.withContext(function($ctx1) { return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLCommand)})},
  36. messageSends: []}),
  37. smalltalk.HLCommand);
  38. smalltalk.addMethod(
  39. "_key",
  40. smalltalk.method({
  41. selector: "key",
  42. fn: function (){
  43. var self=this;
  44. return smalltalk.withContext(function($ctx1) { var $1;
  45. $1=_st(_st(self)._class())._key();
  46. return $1;
  47. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLCommand)})},
  48. messageSends: ["key", "class"]}),
  49. smalltalk.HLCommand);
  50. smalltalk.addMethod(
  51. "_label",
  52. smalltalk.method({
  53. selector: "label",
  54. fn: function (){
  55. var self=this;
  56. return smalltalk.withContext(function($ctx1) { var $1;
  57. $1=_st(_st(self)._class())._label();
  58. return $1;
  59. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLCommand)})},
  60. messageSends: ["label", "class"]}),
  61. smalltalk.HLCommand);
  62. smalltalk.addMethod(
  63. "_bindingGroup",
  64. smalltalk.method({
  65. selector: "bindingGroup",
  66. fn: function (){
  67. var self=this;
  68. return smalltalk.withContext(function($ctx1) { return nil;
  69. }, function($ctx1) {$ctx1.fill(self,"bindingGroup",{}, smalltalk.HLCommand.klass)})},
  70. messageSends: []}),
  71. smalltalk.HLCommand.klass);
  72. smalltalk.addMethod(
  73. "_documentation",
  74. smalltalk.method({
  75. selector: "documentation",
  76. fn: function (){
  77. var self=this;
  78. return smalltalk.withContext(function($ctx1) { return "";
  79. }, function($ctx1) {$ctx1.fill(self,"documentation",{}, smalltalk.HLCommand.klass)})},
  80. messageSends: []}),
  81. smalltalk.HLCommand.klass);
  82. smalltalk.addMethod(
  83. "_key",
  84. smalltalk.method({
  85. selector: "key",
  86. fn: function (){
  87. var self=this;
  88. return smalltalk.withContext(function($ctx1) { return nil;
  89. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLCommand.klass)})},
  90. messageSends: []}),
  91. smalltalk.HLCommand.klass);
  92. smalltalk.addMethod(
  93. "_label",
  94. smalltalk.method({
  95. selector: "label",
  96. fn: function (){
  97. var self=this;
  98. return smalltalk.withContext(function($ctx1) { return "";
  99. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLCommand.klass)})},
  100. messageSends: []}),
  101. smalltalk.HLCommand.klass);
  102. smalltalk.addClass('HLBrowserCommand', smalltalk.HLCommand, ['model'], 'Helios-Commands');
  103. smalltalk.addMethod(
  104. "_model",
  105. smalltalk.method({
  106. selector: "model",
  107. fn: function (){
  108. var self=this;
  109. return smalltalk.withContext(function($ctx1) { var $1;
  110. $1=self["@model"];
  111. return $1;
  112. }, function($ctx1) {$ctx1.fill(self,"model",{}, smalltalk.HLBrowserCommand)})},
  113. messageSends: []}),
  114. smalltalk.HLBrowserCommand);
  115. smalltalk.addMethod(
  116. "_model_",
  117. smalltalk.method({
  118. selector: "model:",
  119. fn: function (aBrowserModel){
  120. var self=this;
  121. return smalltalk.withContext(function($ctx1) { self["@model"]=aBrowserModel;
  122. return self}, function($ctx1) {$ctx1.fill(self,"model:",{aBrowserModel:aBrowserModel}, smalltalk.HLBrowserCommand)})},
  123. messageSends: []}),
  124. smalltalk.HLBrowserCommand);
  125. smalltalk.addMethod(
  126. "_on_",
  127. smalltalk.method({
  128. selector: "on:",
  129. fn: function (aBrowserModel){
  130. var self=this;
  131. return smalltalk.withContext(function($ctx1) { var $2,$3,$1;
  132. $2=_st(self)._new();
  133. _st($2)._model_(aBrowserModel);
  134. $3=_st($2)._yourself();
  135. $1=$3;
  136. return $1;
  137. }, function($ctx1) {$ctx1.fill(self,"on:",{aBrowserModel:aBrowserModel}, smalltalk.HLBrowserCommand.klass)})},
  138. messageSends: ["model:", "new", "yourself"]}),
  139. smalltalk.HLBrowserCommand.klass);
  140. smalltalk.addClass('HLGoToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands');
  141. smalltalk.addMethod(
  142. "_bindingGroup",
  143. smalltalk.method({
  144. selector: "bindingGroup",
  145. fn: function (){
  146. var self=this;
  147. return smalltalk.withContext(function($ctx1) { return "Go to";
  148. }, function($ctx1) {$ctx1.fill(self,"bindingGroup",{}, smalltalk.HLGoToCommand.klass)})},
  149. messageSends: []}),
  150. smalltalk.HLGoToCommand.klass);
  151. smalltalk.addClass('HLGoToClassesCommand', smalltalk.HLGoToCommand, [], 'Helios-Commands');
  152. smalltalk.addMethod(
  153. "_execute",
  154. smalltalk.method({
  155. selector: "execute",
  156. fn: function (){
  157. var self=this;
  158. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnClasses();
  159. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLGoToClassesCommand)})},
  160. messageSends: ["focusOnClasses", "model"]}),
  161. smalltalk.HLGoToClassesCommand);
  162. smalltalk.addMethod(
  163. "_key",
  164. smalltalk.method({
  165. selector: "key",
  166. fn: function (){
  167. var self=this;
  168. return smalltalk.withContext(function($ctx1) { return (67);
  169. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLGoToClassesCommand.klass)})},
  170. messageSends: []}),
  171. smalltalk.HLGoToClassesCommand.klass);
  172. smalltalk.addMethod(
  173. "_label",
  174. smalltalk.method({
  175. selector: "label",
  176. fn: function (){
  177. var self=this;
  178. return smalltalk.withContext(function($ctx1) { return "Classes";
  179. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLGoToClassesCommand.klass)})},
  180. messageSends: []}),
  181. smalltalk.HLGoToClassesCommand.klass);
  182. smalltalk.addClass('HLGoToMethodsCommand', smalltalk.HLGoToCommand, [], 'Helios-Commands');
  183. smalltalk.addMethod(
  184. "_execute",
  185. smalltalk.method({
  186. selector: "execute",
  187. fn: function (){
  188. var self=this;
  189. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnMethods();
  190. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLGoToMethodsCommand)})},
  191. messageSends: ["focusOnMethods", "model"]}),
  192. smalltalk.HLGoToMethodsCommand);
  193. smalltalk.addMethod(
  194. "_key",
  195. smalltalk.method({
  196. selector: "key",
  197. fn: function (){
  198. var self=this;
  199. return smalltalk.withContext(function($ctx1) { return (77);
  200. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLGoToMethodsCommand.klass)})},
  201. messageSends: []}),
  202. smalltalk.HLGoToMethodsCommand.klass);
  203. smalltalk.addMethod(
  204. "_label",
  205. smalltalk.method({
  206. selector: "label",
  207. fn: function (){
  208. var self=this;
  209. return smalltalk.withContext(function($ctx1) { return "Methods";
  210. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLGoToMethodsCommand.klass)})},
  211. messageSends: []}),
  212. smalltalk.HLGoToMethodsCommand.klass);
  213. smalltalk.addClass('HLGoToPackagesCommand', smalltalk.HLGoToCommand, [], 'Helios-Commands');
  214. smalltalk.addMethod(
  215. "_execute",
  216. smalltalk.method({
  217. selector: "execute",
  218. fn: function (){
  219. var self=this;
  220. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnPackages();
  221. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLGoToPackagesCommand)})},
  222. messageSends: ["focusOnPackages", "model"]}),
  223. smalltalk.HLGoToPackagesCommand);
  224. smalltalk.addMethod(
  225. "_key",
  226. smalltalk.method({
  227. selector: "key",
  228. fn: function (){
  229. var self=this;
  230. return smalltalk.withContext(function($ctx1) { return (80);
  231. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLGoToPackagesCommand.klass)})},
  232. messageSends: []}),
  233. smalltalk.HLGoToPackagesCommand.klass);
  234. smalltalk.addMethod(
  235. "_label",
  236. smalltalk.method({
  237. selector: "label",
  238. fn: function (){
  239. var self=this;
  240. return smalltalk.withContext(function($ctx1) { return "Packages";
  241. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLGoToPackagesCommand.klass)})},
  242. messageSends: []}),
  243. smalltalk.HLGoToPackagesCommand.klass);
  244. smalltalk.addClass('HLGoToProtocolsCommand', smalltalk.HLGoToCommand, [], 'Helios-Commands');
  245. smalltalk.addMethod(
  246. "_execute",
  247. smalltalk.method({
  248. selector: "execute",
  249. fn: function (){
  250. var self=this;
  251. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnProtocols();
  252. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLGoToProtocolsCommand)})},
  253. messageSends: ["focusOnProtocols", "model"]}),
  254. smalltalk.HLGoToProtocolsCommand);
  255. smalltalk.addMethod(
  256. "_key",
  257. smalltalk.method({
  258. selector: "key",
  259. fn: function (){
  260. var self=this;
  261. return smalltalk.withContext(function($ctx1) { return (84);
  262. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLGoToProtocolsCommand.klass)})},
  263. messageSends: []}),
  264. smalltalk.HLGoToProtocolsCommand.klass);
  265. smalltalk.addMethod(
  266. "_label",
  267. smalltalk.method({
  268. selector: "label",
  269. fn: function (){
  270. var self=this;
  271. return smalltalk.withContext(function($ctx1) { return "Protocols";
  272. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLGoToProtocolsCommand.klass)})},
  273. messageSends: []}),
  274. smalltalk.HLGoToProtocolsCommand.klass);
  275. smalltalk.addClass('HLGoToSourceCodeCommand', smalltalk.HLGoToCommand, [], 'Helios-Commands');
  276. smalltalk.addMethod(
  277. "_execute",
  278. smalltalk.method({
  279. selector: "execute",
  280. fn: function (){
  281. var self=this;
  282. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnSourceCode();
  283. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLGoToSourceCodeCommand)})},
  284. messageSends: ["focusOnSourceCode", "model"]}),
  285. smalltalk.HLGoToSourceCodeCommand);
  286. smalltalk.addMethod(
  287. "_key",
  288. smalltalk.method({
  289. selector: "key",
  290. fn: function (){
  291. var self=this;
  292. return smalltalk.withContext(function($ctx1) { return (83);
  293. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLGoToSourceCodeCommand.klass)})},
  294. messageSends: []}),
  295. smalltalk.HLGoToSourceCodeCommand.klass);
  296. smalltalk.addMethod(
  297. "_label",
  298. smalltalk.method({
  299. selector: "label",
  300. fn: function (){
  301. var self=this;
  302. return smalltalk.withContext(function($ctx1) { return "Source code";
  303. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLGoToSourceCodeCommand.klass)})},
  304. messageSends: []}),
  305. smalltalk.HLGoToSourceCodeCommand.klass);
  306. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands');
  307. smalltalk.addMethod(
  308. "_bindingGroup",
  309. smalltalk.method({
  310. selector: "bindingGroup",
  311. fn: function (){
  312. var self=this;
  313. return smalltalk.withContext(function($ctx1) { return "Toggle";
  314. }, function($ctx1) {$ctx1.fill(self,"bindingGroup",{}, smalltalk.HLToggleCommand.klass)})},
  315. messageSends: []}),
  316. smalltalk.HLToggleCommand.klass);
  317. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands');
  318. smalltalk.addMethod(
  319. "_execute",
  320. smalltalk.method({
  321. selector: "execute",
  322. fn: function (){
  323. var self=this;
  324. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(false);
  325. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLToggleClassSideCommand)})},
  326. messageSends: ["showInstance:", "model"]}),
  327. smalltalk.HLToggleClassSideCommand);
  328. smalltalk.addMethod(
  329. "_key",
  330. smalltalk.method({
  331. selector: "key",
  332. fn: function (){
  333. var self=this;
  334. return smalltalk.withContext(function($ctx1) { return (67);
  335. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLToggleClassSideCommand.klass)})},
  336. messageSends: []}),
  337. smalltalk.HLToggleClassSideCommand.klass);
  338. smalltalk.addMethod(
  339. "_label",
  340. smalltalk.method({
  341. selector: "label",
  342. fn: function (){
  343. var self=this;
  344. return smalltalk.withContext(function($ctx1) { return "Class side";
  345. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLToggleClassSideCommand.klass)})},
  346. messageSends: []}),
  347. smalltalk.HLToggleClassSideCommand.klass);
  348. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands');
  349. smalltalk.addMethod(
  350. "_execute",
  351. smalltalk.method({
  352. selector: "execute",
  353. fn: function (){
  354. var self=this;
  355. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(true);
  356. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLToggleInstanceSideCommand)})},
  357. messageSends: ["showInstance:", "model"]}),
  358. smalltalk.HLToggleInstanceSideCommand);
  359. smalltalk.addMethod(
  360. "_key",
  361. smalltalk.method({
  362. selector: "key",
  363. fn: function (){
  364. var self=this;
  365. return smalltalk.withContext(function($ctx1) { return (73);
  366. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLToggleInstanceSideCommand.klass)})},
  367. messageSends: []}),
  368. smalltalk.HLToggleInstanceSideCommand.klass);
  369. smalltalk.addMethod(
  370. "_label",
  371. smalltalk.method({
  372. selector: "label",
  373. fn: function (){
  374. var self=this;
  375. return smalltalk.withContext(function($ctx1) { return "Instance side";
  376. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLToggleInstanceSideCommand.klass)})},
  377. messageSends: []}),
  378. smalltalk.HLToggleInstanceSideCommand.klass);
  379. smalltalk.addClass('HLCloseTabCommand', smalltalk.HLCommand, [], 'Helios-Commands');
  380. smalltalk.addMethod(
  381. "_execute",
  382. smalltalk.method({
  383. selector: "execute",
  384. fn: function (){
  385. var self=this;
  386. return smalltalk.withContext(function($ctx1) { _st(_st((smalltalk.HLManager || HLManager))._current())._removeActiveTab();
  387. return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLCloseTabCommand)})},
  388. messageSends: ["removeActiveTab", "current"]}),
  389. smalltalk.HLCloseTabCommand);
  390. smalltalk.addMethod(
  391. "_bindingGroup",
  392. smalltalk.method({
  393. selector: "bindingGroup",
  394. fn: function (){
  395. var self=this;
  396. return smalltalk.withContext(function($ctx1) { return "Close";
  397. }, function($ctx1) {$ctx1.fill(self,"bindingGroup",{}, smalltalk.HLCloseTabCommand.klass)})},
  398. messageSends: []}),
  399. smalltalk.HLCloseTabCommand.klass);
  400. smalltalk.addMethod(
  401. "_key",
  402. smalltalk.method({
  403. selector: "key",
  404. fn: function (){
  405. var self=this;
  406. return smalltalk.withContext(function($ctx1) { return (87);
  407. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCloseTabCommand.klass)})},
  408. messageSends: []}),
  409. smalltalk.HLCloseTabCommand.klass);
  410. smalltalk.addMethod(
  411. "_label",
  412. smalltalk.method({
  413. selector: "label",
  414. fn: function (){
  415. var self=this;
  416. return smalltalk.withContext(function($ctx1) { return "Close tab";
  417. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLCloseTabCommand.klass)})},
  418. messageSends: []}),
  419. smalltalk.HLCloseTabCommand.klass);
  420. smalltalk.addClass('HLOpenCommand', smalltalk.HLCommand, [], 'Helios-Commands');
  421. smalltalk.addMethod(
  422. "_bindingGroup",
  423. smalltalk.method({
  424. selector: "bindingGroup",
  425. fn: function (){
  426. var self=this;
  427. return smalltalk.withContext(function($ctx1) { return "Open";
  428. }, function($ctx1) {$ctx1.fill(self,"bindingGroup",{}, smalltalk.HLOpenCommand.klass)})},
  429. messageSends: []}),
  430. smalltalk.HLOpenCommand.klass);
  431. smalltalk.addClass('HLOpenBrowserCommand', smalltalk.HLOpenCommand, [], 'Helios-Commands');
  432. smalltalk.addMethod(
  433. "_execute",
  434. smalltalk.method({
  435. selector: "execute",
  436. fn: function (){
  437. var self=this;
  438. return smalltalk.withContext(function($ctx1) { var $1;
  439. $1=_st((smalltalk.HLBrowser || HLBrowser))._openAsTab();
  440. return $1;
  441. }, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLOpenBrowserCommand)})},
  442. messageSends: ["openAsTab"]}),
  443. smalltalk.HLOpenBrowserCommand);
  444. smalltalk.addMethod(
  445. "_key",
  446. smalltalk.method({
  447. selector: "key",
  448. fn: function (){
  449. var self=this;
  450. return smalltalk.withContext(function($ctx1) { return (66);
  451. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLOpenBrowserCommand.klass)})},
  452. messageSends: []}),
  453. smalltalk.HLOpenBrowserCommand.klass);
  454. smalltalk.addMethod(
  455. "_label",
  456. smalltalk.method({
  457. selector: "label",
  458. fn: function (){
  459. var self=this;
  460. return smalltalk.withContext(function($ctx1) { return "Browser";
  461. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLOpenBrowserCommand.klass)})},
  462. messageSends: []}),
  463. smalltalk.HLOpenBrowserCommand.klass);
  464. smalltalk.addClass('HLOpenTranscriptCommand', smalltalk.HLOpenCommand, [], 'Helios-Commands');
  465. smalltalk.addMethod(
  466. "_execute",
  467. smalltalk.method({
  468. selector: "execute",
  469. fn: function (){
  470. var self=this;
  471. return smalltalk.withContext(function($ctx1) { var $1;
  472. $1=_st((smalltalk.HLTranscript || HLTranscript))._openAsTab();
  473. return $1;
  474. }, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLOpenTranscriptCommand)})},
  475. messageSends: ["openAsTab"]}),
  476. smalltalk.HLOpenTranscriptCommand);
  477. smalltalk.addMethod(
  478. "_key",
  479. smalltalk.method({
  480. selector: "key",
  481. fn: function (){
  482. var self=this;
  483. return smalltalk.withContext(function($ctx1) { return (84);
  484. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLOpenTranscriptCommand.klass)})},
  485. messageSends: []}),
  486. smalltalk.HLOpenTranscriptCommand.klass);
  487. smalltalk.addMethod(
  488. "_label",
  489. smalltalk.method({
  490. selector: "label",
  491. fn: function (){
  492. var self=this;
  493. return smalltalk.withContext(function($ctx1) { return "Transcript";
  494. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLOpenTranscriptCommand.klass)})},
  495. messageSends: []}),
  496. smalltalk.HLOpenTranscriptCommand.klass);
  497. smalltalk.addClass('HLOpenWorkspaceCommand', smalltalk.HLOpenCommand, [], 'Helios-Commands');
  498. smalltalk.addMethod(
  499. "_execute",
  500. smalltalk.method({
  501. selector: "execute",
  502. fn: function (){
  503. var self=this;
  504. return smalltalk.withContext(function($ctx1) { var $1;
  505. $1=_st((smalltalk.HLWorkspace || HLWorkspace))._openAsTab();
  506. return $1;
  507. }, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLOpenWorkspaceCommand)})},
  508. messageSends: ["openAsTab"]}),
  509. smalltalk.HLOpenWorkspaceCommand);
  510. smalltalk.addMethod(
  511. "_key",
  512. smalltalk.method({
  513. selector: "key",
  514. fn: function (){
  515. var self=this;
  516. return smalltalk.withContext(function($ctx1) { return (87);
  517. }, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLOpenWorkspaceCommand.klass)})},
  518. messageSends: []}),
  519. smalltalk.HLOpenWorkspaceCommand.klass);
  520. smalltalk.addMethod(
  521. "_label",
  522. smalltalk.method({
  523. selector: "label",
  524. fn: function (){
  525. var self=this;
  526. return smalltalk.withContext(function($ctx1) { return "Workspace";
  527. }, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLOpenWorkspaceCommand.klass)})},
  528. messageSends: []}),
  529. smalltalk.HLOpenWorkspaceCommand.klass);
  530. smalltalk.addClass('HLViewCommand', smalltalk.HLCommand, [], 'Helios-Commands');