Helios-Commands-Browser.deploy.js 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368
  1. smalltalk.addPackage('Helios-Commands-Browser');
  2. smalltalk.addClass('HLBrowserCommand', smalltalk.HLToolCommand, [], 'Helios-Commands-Browser');
  3. smalltalk.addMethod(
  4. smalltalk.method({
  5. selector: "isValidFor:",
  6. fn: function (aModel){
  7. var self=this;
  8. return smalltalk.withContext(function($ctx1) {
  9. var $1;
  10. $1=_st(aModel)._isBrowserModel();
  11. return $1;
  12. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{aModel:aModel},smalltalk.HLBrowserCommand.klass)})},
  13. messageSends: ["isBrowserModel"]}),
  14. smalltalk.HLBrowserCommand.klass);
  15. smalltalk.addClass('HLBrowserGoToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  16. smalltalk.addMethod(
  17. smalltalk.method({
  18. selector: "isValidFor:",
  19. fn: function (aModel){
  20. var self=this;
  21. return smalltalk.withContext(function($ctx1) {
  22. var $1;
  23. $1=_st(aModel)._isBrowserModel();
  24. return $1;
  25. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{aModel:aModel},smalltalk.HLBrowserGoToCommand.klass)})},
  26. messageSends: ["isBrowserModel"]}),
  27. smalltalk.HLBrowserGoToCommand.klass);
  28. smalltalk.addMethod(
  29. smalltalk.method({
  30. selector: "key",
  31. fn: function (){
  32. var self=this;
  33. return smalltalk.withContext(function($ctx1) {
  34. return "g";
  35. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLBrowserGoToCommand.klass)})},
  36. messageSends: []}),
  37. smalltalk.HLBrowserGoToCommand.klass);
  38. smalltalk.addMethod(
  39. smalltalk.method({
  40. selector: "label",
  41. fn: function (){
  42. var self=this;
  43. return smalltalk.withContext(function($ctx1) {
  44. return "Go to";
  45. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLBrowserGoToCommand.klass)})},
  46. messageSends: []}),
  47. smalltalk.HLBrowserGoToCommand.klass);
  48. smalltalk.addClass('HLGoToClassesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  49. smalltalk.addMethod(
  50. smalltalk.method({
  51. selector: "execute",
  52. fn: function (){
  53. var self=this;
  54. return smalltalk.withContext(function($ctx1) {
  55. _st(_st(self)._model())._focusOnClasses();
  56. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToClassesCommand)})},
  57. messageSends: ["focusOnClasses", "model"]}),
  58. smalltalk.HLGoToClassesCommand);
  59. smalltalk.addMethod(
  60. smalltalk.method({
  61. selector: "key",
  62. fn: function (){
  63. var self=this;
  64. return smalltalk.withContext(function($ctx1) {
  65. return "c";
  66. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToClassesCommand.klass)})},
  67. messageSends: []}),
  68. smalltalk.HLGoToClassesCommand.klass);
  69. smalltalk.addMethod(
  70. smalltalk.method({
  71. selector: "label",
  72. fn: function (){
  73. var self=this;
  74. return smalltalk.withContext(function($ctx1) {
  75. return "Classes";
  76. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToClassesCommand.klass)})},
  77. messageSends: []}),
  78. smalltalk.HLGoToClassesCommand.klass);
  79. smalltalk.addClass('HLGoToMethodsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  80. smalltalk.addMethod(
  81. smalltalk.method({
  82. selector: "execute",
  83. fn: function (){
  84. var self=this;
  85. return smalltalk.withContext(function($ctx1) {
  86. _st(_st(self)._model())._focusOnMethods();
  87. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToMethodsCommand)})},
  88. messageSends: ["focusOnMethods", "model"]}),
  89. smalltalk.HLGoToMethodsCommand);
  90. smalltalk.addMethod(
  91. smalltalk.method({
  92. selector: "key",
  93. fn: function (){
  94. var self=this;
  95. return smalltalk.withContext(function($ctx1) {
  96. return "m";
  97. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToMethodsCommand.klass)})},
  98. messageSends: []}),
  99. smalltalk.HLGoToMethodsCommand.klass);
  100. smalltalk.addMethod(
  101. smalltalk.method({
  102. selector: "label",
  103. fn: function (){
  104. var self=this;
  105. return smalltalk.withContext(function($ctx1) {
  106. return "Methods";
  107. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToMethodsCommand.klass)})},
  108. messageSends: []}),
  109. smalltalk.HLGoToMethodsCommand.klass);
  110. smalltalk.addClass('HLGoToPackagesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  111. smalltalk.addMethod(
  112. smalltalk.method({
  113. selector: "execute",
  114. fn: function (){
  115. var self=this;
  116. return smalltalk.withContext(function($ctx1) {
  117. _st(_st(self)._model())._focusOnPackages();
  118. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToPackagesCommand)})},
  119. messageSends: ["focusOnPackages", "model"]}),
  120. smalltalk.HLGoToPackagesCommand);
  121. smalltalk.addMethod(
  122. smalltalk.method({
  123. selector: "key",
  124. fn: function (){
  125. var self=this;
  126. return smalltalk.withContext(function($ctx1) {
  127. return "p";
  128. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToPackagesCommand.klass)})},
  129. messageSends: []}),
  130. smalltalk.HLGoToPackagesCommand.klass);
  131. smalltalk.addMethod(
  132. smalltalk.method({
  133. selector: "label",
  134. fn: function (){
  135. var self=this;
  136. return smalltalk.withContext(function($ctx1) {
  137. return "Packages";
  138. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToPackagesCommand.klass)})},
  139. messageSends: []}),
  140. smalltalk.HLGoToPackagesCommand.klass);
  141. smalltalk.addClass('HLGoToProtocolsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  142. smalltalk.addMethod(
  143. smalltalk.method({
  144. selector: "execute",
  145. fn: function (){
  146. var self=this;
  147. return smalltalk.withContext(function($ctx1) {
  148. _st(_st(self)._model())._focusOnProtocols();
  149. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToProtocolsCommand)})},
  150. messageSends: ["focusOnProtocols", "model"]}),
  151. smalltalk.HLGoToProtocolsCommand);
  152. smalltalk.addMethod(
  153. smalltalk.method({
  154. selector: "key",
  155. fn: function (){
  156. var self=this;
  157. return smalltalk.withContext(function($ctx1) {
  158. return "t";
  159. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToProtocolsCommand.klass)})},
  160. messageSends: []}),
  161. smalltalk.HLGoToProtocolsCommand.klass);
  162. smalltalk.addMethod(
  163. smalltalk.method({
  164. selector: "label",
  165. fn: function (){
  166. var self=this;
  167. return smalltalk.withContext(function($ctx1) {
  168. return "Protocols";
  169. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToProtocolsCommand.klass)})},
  170. messageSends: []}),
  171. smalltalk.HLGoToProtocolsCommand.klass);
  172. smalltalk.addClass('HLGoToSourceCodeCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  173. smalltalk.addMethod(
  174. smalltalk.method({
  175. selector: "execute",
  176. fn: function (){
  177. var self=this;
  178. return smalltalk.withContext(function($ctx1) {
  179. _st(_st(self)._model())._focusOnSourceCode();
  180. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToSourceCodeCommand)})},
  181. messageSends: ["focusOnSourceCode", "model"]}),
  182. smalltalk.HLGoToSourceCodeCommand);
  183. smalltalk.addMethod(
  184. smalltalk.method({
  185. selector: "key",
  186. fn: function (){
  187. var self=this;
  188. return smalltalk.withContext(function($ctx1) {
  189. return "s";
  190. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  191. messageSends: []}),
  192. smalltalk.HLGoToSourceCodeCommand.klass);
  193. smalltalk.addMethod(
  194. smalltalk.method({
  195. selector: "label",
  196. fn: function (){
  197. var self=this;
  198. return smalltalk.withContext(function($ctx1) {
  199. return "Source code";
  200. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  201. messageSends: []}),
  202. smalltalk.HLGoToSourceCodeCommand.klass);
  203. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  204. smalltalk.addMethod(
  205. smalltalk.method({
  206. selector: "key",
  207. fn: function (){
  208. var self=this;
  209. return smalltalk.withContext(function($ctx1) {
  210. return "t";
  211. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
  212. messageSends: []}),
  213. smalltalk.HLToggleCommand.klass);
  214. smalltalk.addMethod(
  215. smalltalk.method({
  216. selector: "label",
  217. fn: function (){
  218. var self=this;
  219. return smalltalk.withContext(function($ctx1) {
  220. return "Toggle";
  221. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
  222. messageSends: []}),
  223. smalltalk.HLToggleCommand.klass);
  224. smalltalk.addClass('HLToggleClassCommentCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  225. smalltalk.addMethod(
  226. smalltalk.method({
  227. selector: "execute",
  228. fn: function (){
  229. var self=this;
  230. return smalltalk.withContext(function($ctx1) {
  231. _st(_st(self)._model())._showComment_(_st(_st(_st(self)._model())._showComment())._not());
  232. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassCommentCommand)})},
  233. messageSends: ["showComment:", "not", "showComment", "model"]}),
  234. smalltalk.HLToggleClassCommentCommand);
  235. smalltalk.addMethod(
  236. smalltalk.method({
  237. selector: "key",
  238. fn: function (){
  239. var self=this;
  240. return smalltalk.withContext(function($ctx1) {
  241. return "d";
  242. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassCommentCommand.klass)})},
  243. messageSends: []}),
  244. smalltalk.HLToggleClassCommentCommand.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 "Documentation";
  252. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassCommentCommand.klass)})},
  253. messageSends: []}),
  254. smalltalk.HLToggleClassCommentCommand.klass);
  255. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  256. smalltalk.addMethod(
  257. smalltalk.method({
  258. selector: "execute",
  259. fn: function (){
  260. var self=this;
  261. return smalltalk.withContext(function($ctx1) {
  262. _st(_st(self)._model())._showInstance_(false);
  263. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
  264. messageSends: ["showInstance:", "model"]}),
  265. smalltalk.HLToggleClassSideCommand);
  266. smalltalk.addMethod(
  267. smalltalk.method({
  268. selector: "key",
  269. fn: function (){
  270. var self=this;
  271. return smalltalk.withContext(function($ctx1) {
  272. return "c";
  273. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
  274. messageSends: []}),
  275. smalltalk.HLToggleClassSideCommand.klass);
  276. smalltalk.addMethod(
  277. smalltalk.method({
  278. selector: "label",
  279. fn: function (){
  280. var self=this;
  281. return smalltalk.withContext(function($ctx1) {
  282. return "Class side";
  283. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
  284. messageSends: []}),
  285. smalltalk.HLToggleClassSideCommand.klass);
  286. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  287. smalltalk.addMethod(
  288. smalltalk.method({
  289. selector: "execute",
  290. fn: function (){
  291. var self=this;
  292. return smalltalk.withContext(function($ctx1) {
  293. _st(_st(self)._model())._showInstance_(true);
  294. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
  295. messageSends: ["showInstance:", "model"]}),
  296. smalltalk.HLToggleInstanceSideCommand);
  297. smalltalk.addMethod(
  298. smalltalk.method({
  299. selector: "key",
  300. fn: function (){
  301. var self=this;
  302. return smalltalk.withContext(function($ctx1) {
  303. return "i";
  304. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  305. messageSends: []}),
  306. smalltalk.HLToggleInstanceSideCommand.klass);
  307. smalltalk.addMethod(
  308. smalltalk.method({
  309. selector: "label",
  310. fn: function (){
  311. var self=this;
  312. return smalltalk.withContext(function($ctx1) {
  313. return "Instance side";
  314. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  315. messageSends: []}),
  316. smalltalk.HLToggleInstanceSideCommand.klass);