Helios-Commands-Browser.deploy.js 40 KB

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