Helios-Commands-Browser.deploy.js 39 KB

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