Helios-Commands-Browser.deploy.js 48 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655
  1. smalltalk.addPackage('Helios-Commands-Browser');
  2. smalltalk.addClass('HLBrowserCommand', smalltalk.HLModelCommand, [], 'Helios-Commands-Browser');
  3. smalltalk.addMethod(
  4. smalltalk.method({
  5. selector: "category",
  6. fn: function (){
  7. var self=this;
  8. return smalltalk.withContext(function($ctx1) {
  9. return nil;
  10. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLBrowserCommand)})},
  11. messageSends: []}),
  12. smalltalk.HLBrowserCommand);
  13. smalltalk.addMethod(
  14. smalltalk.method({
  15. selector: "for:",
  16. fn: function (aBrowserModel){
  17. var self=this;
  18. return smalltalk.withContext(function($ctx1) {
  19. var $2,$3,$1;
  20. $2=_st(self)._new();
  21. _st($2)._model_(aBrowserModel);
  22. $3=_st($2)._yourself();
  23. $1=$3;
  24. return $1;
  25. }, function($ctx1) {$ctx1.fill(self,"for:",{aBrowserModel:aBrowserModel},smalltalk.HLBrowserCommand.klass)})},
  26. messageSends: ["model:", "new", "yourself"]}),
  27. smalltalk.HLBrowserCommand.klass);
  28. smalltalk.addClass('HLBrowserGoToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  29. smalltalk.addMethod(
  30. smalltalk.method({
  31. selector: "key",
  32. fn: function (){
  33. var self=this;
  34. return smalltalk.withContext(function($ctx1) {
  35. return "g";
  36. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLBrowserGoToCommand.klass)})},
  37. messageSends: []}),
  38. smalltalk.HLBrowserGoToCommand.klass);
  39. smalltalk.addMethod(
  40. smalltalk.method({
  41. selector: "label",
  42. fn: function (){
  43. var self=this;
  44. return smalltalk.withContext(function($ctx1) {
  45. return "Go to";
  46. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLBrowserGoToCommand.klass)})},
  47. messageSends: []}),
  48. smalltalk.HLBrowserGoToCommand.klass);
  49. smalltalk.addClass('HLGoToClassesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  50. smalltalk.addMethod(
  51. smalltalk.method({
  52. selector: "execute",
  53. fn: function (){
  54. var self=this;
  55. return smalltalk.withContext(function($ctx1) {
  56. _st(_st(self)._model())._focusOnClasses();
  57. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToClassesCommand)})},
  58. messageSends: ["focusOnClasses", "model"]}),
  59. smalltalk.HLGoToClassesCommand);
  60. smalltalk.addMethod(
  61. smalltalk.method({
  62. selector: "key",
  63. fn: function (){
  64. var self=this;
  65. return smalltalk.withContext(function($ctx1) {
  66. return "c";
  67. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToClassesCommand.klass)})},
  68. messageSends: []}),
  69. smalltalk.HLGoToClassesCommand.klass);
  70. smalltalk.addMethod(
  71. smalltalk.method({
  72. selector: "label",
  73. fn: function (){
  74. var self=this;
  75. return smalltalk.withContext(function($ctx1) {
  76. return "Classes";
  77. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToClassesCommand.klass)})},
  78. messageSends: []}),
  79. smalltalk.HLGoToClassesCommand.klass);
  80. smalltalk.addClass('HLGoToMethodsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  81. smalltalk.addMethod(
  82. smalltalk.method({
  83. selector: "execute",
  84. fn: function (){
  85. var self=this;
  86. return smalltalk.withContext(function($ctx1) {
  87. _st(_st(self)._model())._focusOnMethods();
  88. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToMethodsCommand)})},
  89. messageSends: ["focusOnMethods", "model"]}),
  90. smalltalk.HLGoToMethodsCommand);
  91. smalltalk.addMethod(
  92. smalltalk.method({
  93. selector: "key",
  94. fn: function (){
  95. var self=this;
  96. return smalltalk.withContext(function($ctx1) {
  97. return "m";
  98. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToMethodsCommand.klass)})},
  99. messageSends: []}),
  100. smalltalk.HLGoToMethodsCommand.klass);
  101. smalltalk.addMethod(
  102. smalltalk.method({
  103. selector: "label",
  104. fn: function (){
  105. var self=this;
  106. return smalltalk.withContext(function($ctx1) {
  107. return "Methods";
  108. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToMethodsCommand.klass)})},
  109. messageSends: []}),
  110. smalltalk.HLGoToMethodsCommand.klass);
  111. smalltalk.addClass('HLGoToPackagesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  112. smalltalk.addMethod(
  113. smalltalk.method({
  114. selector: "execute",
  115. fn: function (){
  116. var self=this;
  117. return smalltalk.withContext(function($ctx1) {
  118. _st(_st(self)._model())._focusOnPackages();
  119. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToPackagesCommand)})},
  120. messageSends: ["focusOnPackages", "model"]}),
  121. smalltalk.HLGoToPackagesCommand);
  122. smalltalk.addMethod(
  123. smalltalk.method({
  124. selector: "key",
  125. fn: function (){
  126. var self=this;
  127. return smalltalk.withContext(function($ctx1) {
  128. return "p";
  129. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToPackagesCommand.klass)})},
  130. messageSends: []}),
  131. smalltalk.HLGoToPackagesCommand.klass);
  132. smalltalk.addMethod(
  133. smalltalk.method({
  134. selector: "label",
  135. fn: function (){
  136. var self=this;
  137. return smalltalk.withContext(function($ctx1) {
  138. return "Packages";
  139. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToPackagesCommand.klass)})},
  140. messageSends: []}),
  141. smalltalk.HLGoToPackagesCommand.klass);
  142. smalltalk.addClass('HLGoToProtocolsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  143. smalltalk.addMethod(
  144. smalltalk.method({
  145. selector: "execute",
  146. fn: function (){
  147. var self=this;
  148. return smalltalk.withContext(function($ctx1) {
  149. _st(_st(self)._model())._focusOnProtocols();
  150. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToProtocolsCommand)})},
  151. messageSends: ["focusOnProtocols", "model"]}),
  152. smalltalk.HLGoToProtocolsCommand);
  153. smalltalk.addMethod(
  154. smalltalk.method({
  155. selector: "key",
  156. fn: function (){
  157. var self=this;
  158. return smalltalk.withContext(function($ctx1) {
  159. return "t";
  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. return "s";
  191. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  192. messageSends: []}),
  193. smalltalk.HLGoToSourceCodeCommand.klass);
  194. smalltalk.addMethod(
  195. smalltalk.method({
  196. selector: "label",
  197. fn: function (){
  198. var self=this;
  199. return smalltalk.withContext(function($ctx1) {
  200. return "Source code";
  201. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  202. messageSends: []}),
  203. smalltalk.HLGoToSourceCodeCommand.klass);
  204. smalltalk.addClass('HLCommitPackageCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  205. smalltalk.addMethod(
  206. smalltalk.method({
  207. selector: "category",
  208. fn: function (){
  209. var self=this;
  210. return smalltalk.withContext(function($ctx1) {
  211. return "Packages";
  212. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCommitPackageCommand)})},
  213. messageSends: []}),
  214. smalltalk.HLCommitPackageCommand);
  215. smalltalk.addMethod(
  216. smalltalk.method({
  217. selector: "execute",
  218. fn: function (){
  219. var self=this;
  220. return smalltalk.withContext(function($ctx1) {
  221. _st(_st(self)._model())._commitPackage();
  222. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCommitPackageCommand)})},
  223. messageSends: ["commitPackage", "model"]}),
  224. smalltalk.HLCommitPackageCommand);
  225. smalltalk.addMethod(
  226. smalltalk.method({
  227. selector: "isActive",
  228. fn: function (){
  229. var self=this;
  230. return smalltalk.withContext(function($ctx1) {
  231. return true;
  232. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCommitPackageCommand)})},
  233. messageSends: []}),
  234. smalltalk.HLCommitPackageCommand);
  235. smalltalk.addMethod(
  236. smalltalk.method({
  237. selector: "key",
  238. fn: function (){
  239. var self=this;
  240. return smalltalk.withContext(function($ctx1) {
  241. return "k";
  242. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCommitPackageCommand.klass)})},
  243. messageSends: []}),
  244. smalltalk.HLCommitPackageCommand.klass);
  245. smalltalk.addMethod(
  246. smalltalk.method({
  247. selector: "label",
  248. fn: function (){
  249. var self=this;
  250. return smalltalk.withContext(function($ctx1) {
  251. return "Commit";
  252. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCommitPackageCommand.klass)})},
  253. messageSends: []}),
  254. smalltalk.HLCommitPackageCommand.klass);
  255. smalltalk.addClass('HLCopyCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  256. smalltalk.addMethod(
  257. smalltalk.method({
  258. selector: "key",
  259. fn: function (){
  260. var self=this;
  261. return smalltalk.withContext(function($ctx1) {
  262. return "c";
  263. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCopyCommand.klass)})},
  264. messageSends: []}),
  265. smalltalk.HLCopyCommand.klass);
  266. smalltalk.addMethod(
  267. smalltalk.method({
  268. selector: "label",
  269. fn: function (){
  270. var self=this;
  271. return smalltalk.withContext(function($ctx1) {
  272. return "Copy";
  273. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCopyCommand.klass)})},
  274. messageSends: []}),
  275. smalltalk.HLCopyCommand.klass);
  276. smalltalk.addClass('HLCopyClassCommand', smalltalk.HLCopyCommand, [], 'Helios-Commands-Browser');
  277. smalltalk.addMethod(
  278. smalltalk.method({
  279. selector: "category",
  280. fn: function (){
  281. var self=this;
  282. return smalltalk.withContext(function($ctx1) {
  283. return "Classes";
  284. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLCopyClassCommand)})},
  285. messageSends: []}),
  286. smalltalk.HLCopyClassCommand);
  287. smalltalk.addMethod(
  288. smalltalk.method({
  289. selector: "defaultInput",
  290. fn: function (){
  291. var self=this;
  292. return smalltalk.withContext(function($ctx1) {
  293. var $1;
  294. $1=_st(_st(_st(self)._model())._selectedClass())._name();
  295. return $1;
  296. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLCopyClassCommand)})},
  297. messageSends: ["name", "selectedClass", "model"]}),
  298. smalltalk.HLCopyClassCommand);
  299. smalltalk.addMethod(
  300. smalltalk.method({
  301. selector: "displayLabel",
  302. fn: function (){
  303. var self=this;
  304. return smalltalk.withContext(function($ctx1) {
  305. return "New class name:";
  306. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLCopyClassCommand)})},
  307. messageSends: []}),
  308. smalltalk.HLCopyClassCommand);
  309. smalltalk.addMethod(
  310. smalltalk.method({
  311. selector: "execute",
  312. fn: function (){
  313. var self=this;
  314. return smalltalk.withContext(function($ctx1) {
  315. _st(_st(self)._model())._copyClassTo_(_st(self)._input());
  316. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCopyClassCommand)})},
  317. messageSends: ["copyClassTo:", "input", "model"]}),
  318. smalltalk.HLCopyClassCommand);
  319. smalltalk.addMethod(
  320. smalltalk.method({
  321. selector: "isActive",
  322. fn: function (){
  323. var self=this;
  324. return smalltalk.withContext(function($ctx1) {
  325. var $1;
  326. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  327. return $1;
  328. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCopyClassCommand)})},
  329. messageSends: ["notNil", "selectedClass", "model"]}),
  330. smalltalk.HLCopyClassCommand);
  331. smalltalk.addMethod(
  332. smalltalk.method({
  333. selector: "isInputRequired",
  334. fn: function (){
  335. var self=this;
  336. return smalltalk.withContext(function($ctx1) {
  337. return true;
  338. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLCopyClassCommand)})},
  339. messageSends: []}),
  340. smalltalk.HLCopyClassCommand);
  341. smalltalk.addMethod(
  342. smalltalk.method({
  343. selector: "key",
  344. fn: function (){
  345. var self=this;
  346. return smalltalk.withContext(function($ctx1) {
  347. return "c";
  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. return "f";
  379. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindCommand.klass)})},
  380. messageSends: []}),
  381. smalltalk.HLFindCommand.klass);
  382. smalltalk.addMethod(
  383. smalltalk.method({
  384. selector: "label",
  385. fn: function (){
  386. var self=this;
  387. return smalltalk.withContext(function($ctx1) {
  388. return "Find";
  389. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindCommand.klass)})},
  390. messageSends: []}),
  391. smalltalk.HLFindCommand.klass);
  392. smalltalk.addClass('HLFindClassCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Browser');
  393. smalltalk.addMethod(
  394. smalltalk.method({
  395. selector: "displayLabel",
  396. fn: function (){
  397. var self=this;
  398. return smalltalk.withContext(function($ctx1) {
  399. return "select a class";
  400. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindClassCommand)})},
  401. messageSends: []}),
  402. smalltalk.HLFindClassCommand);
  403. smalltalk.addMethod(
  404. smalltalk.method({
  405. selector: "execute",
  406. fn: function (){
  407. var self=this;
  408. return smalltalk.withContext(function($ctx1) {
  409. _st(_st(self)._model())._openClassNamed_(_st(self)._input());
  410. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindClassCommand)})},
  411. messageSends: ["openClassNamed:", "input", "model"]}),
  412. smalltalk.HLFindClassCommand);
  413. smalltalk.addMethod(
  414. smalltalk.method({
  415. selector: "inputCompletion",
  416. fn: function (){
  417. var self=this;
  418. return smalltalk.withContext(function($ctx1) {
  419. var $1;
  420. $1=_st(_st(self)._model())._availableClassNames();
  421. return $1;
  422. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindClassCommand)})},
  423. messageSends: ["availableClassNames", "model"]}),
  424. smalltalk.HLFindClassCommand);
  425. smalltalk.addMethod(
  426. smalltalk.method({
  427. selector: "inputLabel",
  428. fn: function (){
  429. var self=this;
  430. return smalltalk.withContext(function($ctx1) {
  431. return "Find a class";
  432. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindClassCommand)})},
  433. messageSends: []}),
  434. smalltalk.HLFindClassCommand);
  435. smalltalk.addMethod(
  436. smalltalk.method({
  437. selector: "isInputRequired",
  438. fn: function (){
  439. var self=this;
  440. return smalltalk.withContext(function($ctx1) {
  441. return true;
  442. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindClassCommand)})},
  443. messageSends: []}),
  444. smalltalk.HLFindClassCommand);
  445. smalltalk.addMethod(
  446. smalltalk.method({
  447. selector: "key",
  448. fn: function (){
  449. var self=this;
  450. return smalltalk.withContext(function($ctx1) {
  451. return "c";
  452. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})},
  453. messageSends: []}),
  454. smalltalk.HLFindClassCommand.klass);
  455. smalltalk.addMethod(
  456. smalltalk.method({
  457. selector: "label",
  458. fn: function (){
  459. var self=this;
  460. return smalltalk.withContext(function($ctx1) {
  461. return "Class";
  462. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})},
  463. messageSends: []}),
  464. smalltalk.HLFindClassCommand.klass);
  465. smalltalk.addClass('HLFindReferencesCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Browser');
  466. smalltalk.addMethod(
  467. smalltalk.method({
  468. selector: "defaultInput",
  469. fn: function (){
  470. var self=this;
  471. return smalltalk.withContext(function($ctx1) {
  472. var $2,$3,$1;
  473. $2=_st(_st(self)._model())._selectedMethod();
  474. if(($receiver = $2) == nil || $receiver == undefined){
  475. $3=_st(_st(self)._model())._selectedClass();
  476. if(($receiver = $3) == nil || $receiver == undefined){
  477. $1="";
  478. } else {
  479. var class_;
  480. class_=$receiver;
  481. $1=_st(class_)._name();
  482. };
  483. } else {
  484. var method;
  485. method=$receiver;
  486. $1=_st(method)._selector();
  487. };
  488. return $1;
  489. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLFindReferencesCommand)})},
  490. messageSends: ["ifNil:ifNotNil:", "name", "selectedClass", "model", "selector", "selectedMethod"]}),
  491. smalltalk.HLFindReferencesCommand);
  492. smalltalk.addMethod(
  493. smalltalk.method({
  494. selector: "displayLabel",
  495. fn: function (){
  496. var self=this;
  497. return smalltalk.withContext(function($ctx1) {
  498. return "find references";
  499. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindReferencesCommand)})},
  500. messageSends: []}),
  501. smalltalk.HLFindReferencesCommand);
  502. smalltalk.addMethod(
  503. smalltalk.method({
  504. selector: "execute",
  505. fn: function (){
  506. var self=this;
  507. function $HLReferences(){return smalltalk.HLReferences||(typeof HLReferences=="undefined"?nil:HLReferences)}
  508. return smalltalk.withContext(function($ctx1) {
  509. var $1,$2;
  510. $1=_st($HLReferences())._new();
  511. _st($1)._open();
  512. $2=_st($1)._search_(_st(self)._input());
  513. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindReferencesCommand)})},
  514. messageSends: ["open", "new", "search:", "input"]}),
  515. smalltalk.HLFindReferencesCommand);
  516. smalltalk.addMethod(
  517. smalltalk.method({
  518. selector: "inputCompletion",
  519. fn: function (){
  520. var self=this;
  521. return smalltalk.withContext(function($ctx1) {
  522. var $1;
  523. $1=_st(_st(_st(self)._model())._availableClassNames()).__comma(_st(_st(self)._model())._allSelectors());
  524. return $1;
  525. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindReferencesCommand)})},
  526. messageSends: [",", "allSelectors", "model", "availableClassNames"]}),
  527. smalltalk.HLFindReferencesCommand);
  528. smalltalk.addMethod(
  529. smalltalk.method({
  530. selector: "inputLabel",
  531. fn: function (){
  532. var self=this;
  533. return smalltalk.withContext(function($ctx1) {
  534. return "Find references of";
  535. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindReferencesCommand)})},
  536. messageSends: []}),
  537. smalltalk.HLFindReferencesCommand);
  538. smalltalk.addMethod(
  539. smalltalk.method({
  540. selector: "isInputRequired",
  541. fn: function (){
  542. var self=this;
  543. return smalltalk.withContext(function($ctx1) {
  544. return true;
  545. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindReferencesCommand)})},
  546. messageSends: []}),
  547. smalltalk.HLFindReferencesCommand);
  548. smalltalk.addMethod(
  549. smalltalk.method({
  550. selector: "key",
  551. fn: function (){
  552. var self=this;
  553. return smalltalk.withContext(function($ctx1) {
  554. return "r";
  555. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindReferencesCommand.klass)})},
  556. messageSends: []}),
  557. smalltalk.HLFindReferencesCommand.klass);
  558. smalltalk.addMethod(
  559. smalltalk.method({
  560. selector: "label",
  561. fn: function (){
  562. var self=this;
  563. return smalltalk.withContext(function($ctx1) {
  564. return "References";
  565. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindReferencesCommand.klass)})},
  566. messageSends: []}),
  567. smalltalk.HLFindReferencesCommand.klass);
  568. smalltalk.addClass('HLMoveToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  569. smalltalk.addMethod(
  570. smalltalk.method({
  571. selector: "key",
  572. fn: function (){
  573. var self=this;
  574. return smalltalk.withContext(function($ctx1) {
  575. return "m";
  576. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  577. messageSends: []}),
  578. smalltalk.HLMoveToCommand.klass);
  579. smalltalk.addMethod(
  580. smalltalk.method({
  581. selector: "label",
  582. fn: function (){
  583. var self=this;
  584. return smalltalk.withContext(function($ctx1) {
  585. return "Move";
  586. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  587. messageSends: []}),
  588. smalltalk.HLMoveToCommand.klass);
  589. smalltalk.addClass('HLMoveClassToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser');
  590. smalltalk.addMethod(
  591. smalltalk.method({
  592. selector: "isActive",
  593. fn: function (){
  594. var self=this;
  595. return smalltalk.withContext(function($ctx1) {
  596. var $1;
  597. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  598. return $1;
  599. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveClassToCommand)})},
  600. messageSends: ["notNil", "selectedClass", "model"]}),
  601. smalltalk.HLMoveClassToCommand);
  602. smalltalk.addMethod(
  603. smalltalk.method({
  604. selector: "key",
  605. fn: function (){
  606. var self=this;
  607. return smalltalk.withContext(function($ctx1) {
  608. return "c";
  609. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassToCommand.klass)})},
  610. messageSends: []}),
  611. smalltalk.HLMoveClassToCommand.klass);
  612. smalltalk.addMethod(
  613. smalltalk.method({
  614. selector: "label",
  615. fn: function (){
  616. var self=this;
  617. return smalltalk.withContext(function($ctx1) {
  618. return "Class";
  619. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassToCommand.klass)})},
  620. messageSends: []}),
  621. smalltalk.HLMoveClassToCommand.klass);
  622. smalltalk.addClass('HLMoveClassToPackageCommand', smalltalk.HLMoveClassToCommand, [], 'Helios-Commands-Browser');
  623. smalltalk.addMethod(
  624. smalltalk.method({
  625. selector: "category",
  626. fn: function (){
  627. var self=this;
  628. return smalltalk.withContext(function($ctx1) {
  629. return "Classes";
  630. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveClassToPackageCommand)})},
  631. messageSends: []}),
  632. smalltalk.HLMoveClassToPackageCommand);
  633. smalltalk.addMethod(
  634. smalltalk.method({
  635. selector: "displayLabel",
  636. fn: function (){
  637. var self=this;
  638. return smalltalk.withContext(function($ctx1) {
  639. return "select a package";
  640. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveClassCommand)})},
  641. messageSends: []}),
  642. smalltalk.HLMoveClassToPackageCommand);
  643. smalltalk.addMethod(
  644. smalltalk.method({
  645. selector: "execute",
  646. fn: function (){
  647. var self=this;
  648. return smalltalk.withContext(function($ctx1) {
  649. _st(_st(self)._model())._moveClassToPackage_(_st(self)._input());
  650. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveClassCommand)})},
  651. messageSends: ["moveClassToPackage:", "input", "model"]}),
  652. smalltalk.HLMoveClassToPackageCommand);
  653. smalltalk.addMethod(
  654. smalltalk.method({
  655. selector: "inputCompletion",
  656. fn: function (){
  657. var self=this;
  658. return smalltalk.withContext(function($ctx1) {
  659. var $1;
  660. $1=_st(_st(self)._model())._availablePackageNames();
  661. return $1;
  662. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveClassCommand)})},
  663. messageSends: ["availablePackageNames", "model"]}),
  664. smalltalk.HLMoveClassToPackageCommand);
  665. smalltalk.addMethod(
  666. smalltalk.method({
  667. selector: "inputLabel",
  668. fn: function (){
  669. var self=this;
  670. return smalltalk.withContext(function($ctx1) {
  671. return "Move class to package:";
  672. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveClassCommand)})},
  673. messageSends: []}),
  674. smalltalk.HLMoveClassToPackageCommand);
  675. smalltalk.addMethod(
  676. smalltalk.method({
  677. selector: "isInputRequired",
  678. fn: function (){
  679. var self=this;
  680. return smalltalk.withContext(function($ctx1) {
  681. return true;
  682. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveClassCommand)})},
  683. messageSends: []}),
  684. smalltalk.HLMoveClassToPackageCommand);
  685. smalltalk.addMethod(
  686. smalltalk.method({
  687. selector: "key",
  688. fn: function (){
  689. var self=this;
  690. return smalltalk.withContext(function($ctx1) {
  691. return "p";
  692. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveClassCommand.klass)})},
  693. messageSends: []}),
  694. smalltalk.HLMoveClassToPackageCommand.klass);
  695. smalltalk.addMethod(
  696. smalltalk.method({
  697. selector: "label",
  698. fn: function (){
  699. var self=this;
  700. return smalltalk.withContext(function($ctx1) {
  701. return "to package";
  702. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveClassCommand.klass)})},
  703. messageSends: []}),
  704. smalltalk.HLMoveClassToPackageCommand.klass);
  705. smalltalk.addMethod(
  706. smalltalk.method({
  707. selector: "menuLabel",
  708. fn: function (){
  709. var self=this;
  710. return smalltalk.withContext(function($ctx1) {
  711. return "Move to package...";
  712. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveClassCommand.klass)})},
  713. messageSends: []}),
  714. smalltalk.HLMoveClassToPackageCommand.klass);
  715. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser');
  716. smalltalk.addMethod(
  717. smalltalk.method({
  718. selector: "category",
  719. fn: function (){
  720. var self=this;
  721. return smalltalk.withContext(function($ctx1) {
  722. return "Methods";
  723. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLMoveMethodToCommand)})},
  724. messageSends: []}),
  725. smalltalk.HLMoveMethodToCommand);
  726. smalltalk.addMethod(
  727. smalltalk.method({
  728. selector: "isActive",
  729. fn: function (){
  730. var self=this;
  731. return smalltalk.withContext(function($ctx1) {
  732. var $1;
  733. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  734. return $1;
  735. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
  736. messageSends: ["notNil", "selectedMethod", "model"]}),
  737. smalltalk.HLMoveMethodToCommand);
  738. smalltalk.addMethod(
  739. smalltalk.method({
  740. selector: "key",
  741. fn: function (){
  742. var self=this;
  743. return smalltalk.withContext(function($ctx1) {
  744. return "m";
  745. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  746. messageSends: []}),
  747. smalltalk.HLMoveMethodToCommand.klass);
  748. smalltalk.addMethod(
  749. smalltalk.method({
  750. selector: "label",
  751. fn: function (){
  752. var self=this;
  753. return smalltalk.withContext(function($ctx1) {
  754. return "Method";
  755. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  756. messageSends: []}),
  757. smalltalk.HLMoveMethodToCommand.klass);
  758. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  759. smalltalk.addMethod(
  760. smalltalk.method({
  761. selector: "displayLabel",
  762. fn: function (){
  763. var self=this;
  764. return smalltalk.withContext(function($ctx1) {
  765. return "select a class";
  766. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  767. messageSends: []}),
  768. smalltalk.HLMoveMethodToClassCommand);
  769. smalltalk.addMethod(
  770. smalltalk.method({
  771. selector: "execute",
  772. fn: function (){
  773. var self=this;
  774. return smalltalk.withContext(function($ctx1) {
  775. _st(_st(self)._model())._moveMethodToClass_(_st(self)._input());
  776. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  777. messageSends: ["moveMethodToClass:", "input", "model"]}),
  778. smalltalk.HLMoveMethodToClassCommand);
  779. smalltalk.addMethod(
  780. smalltalk.method({
  781. selector: "inputCompletion",
  782. fn: function (){
  783. var self=this;
  784. return smalltalk.withContext(function($ctx1) {
  785. var $1;
  786. $1=_st(_st(self)._model())._availableClassNames();
  787. return $1;
  788. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToClassCommand)})},
  789. messageSends: ["availableClassNames", "model"]}),
  790. smalltalk.HLMoveMethodToClassCommand);
  791. smalltalk.addMethod(
  792. smalltalk.method({
  793. selector: "inputLabel",
  794. fn: function (){
  795. var self=this;
  796. return smalltalk.withContext(function($ctx1) {
  797. return "Move method to class:";
  798. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  799. messageSends: []}),
  800. smalltalk.HLMoveMethodToClassCommand);
  801. smalltalk.addMethod(
  802. smalltalk.method({
  803. selector: "isInputRequired",
  804. fn: function (){
  805. var self=this;
  806. return smalltalk.withContext(function($ctx1) {
  807. return true;
  808. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
  809. messageSends: []}),
  810. smalltalk.HLMoveMethodToClassCommand);
  811. smalltalk.addMethod(
  812. smalltalk.method({
  813. selector: "key",
  814. fn: function (){
  815. var self=this;
  816. return smalltalk.withContext(function($ctx1) {
  817. return "c";
  818. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  819. messageSends: []}),
  820. smalltalk.HLMoveMethodToClassCommand.klass);
  821. smalltalk.addMethod(
  822. smalltalk.method({
  823. selector: "label",
  824. fn: function (){
  825. var self=this;
  826. return smalltalk.withContext(function($ctx1) {
  827. return "to class";
  828. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  829. messageSends: []}),
  830. smalltalk.HLMoveMethodToClassCommand.klass);
  831. smalltalk.addMethod(
  832. smalltalk.method({
  833. selector: "menuLabel",
  834. fn: function (){
  835. var self=this;
  836. return smalltalk.withContext(function($ctx1) {
  837. return "Move to class...";
  838. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  839. messageSends: []}),
  840. smalltalk.HLMoveMethodToClassCommand.klass);
  841. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  842. smalltalk.addMethod(
  843. smalltalk.method({
  844. selector: "displayLabel",
  845. fn: function (){
  846. var self=this;
  847. return smalltalk.withContext(function($ctx1) {
  848. return "select a protocol";
  849. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  850. messageSends: []}),
  851. smalltalk.HLMoveMethodToProtocolCommand);
  852. smalltalk.addMethod(
  853. smalltalk.method({
  854. selector: "execute",
  855. fn: function (){
  856. var self=this;
  857. return smalltalk.withContext(function($ctx1) {
  858. _st(_st(self)._model())._moveMethodToProtocol_(_st(self)._input());
  859. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  860. messageSends: ["moveMethodToProtocol:", "input", "model"]}),
  861. smalltalk.HLMoveMethodToProtocolCommand);
  862. smalltalk.addMethod(
  863. smalltalk.method({
  864. selector: "inputCompletion",
  865. fn: function (){
  866. var self=this;
  867. return smalltalk.withContext(function($ctx1) {
  868. var $1;
  869. $1=_st(_st(self)._model())._availableProtocols();
  870. return $1;
  871. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  872. messageSends: ["availableProtocols", "model"]}),
  873. smalltalk.HLMoveMethodToProtocolCommand);
  874. smalltalk.addMethod(
  875. smalltalk.method({
  876. selector: "inputLabel",
  877. fn: function (){
  878. var self=this;
  879. return smalltalk.withContext(function($ctx1) {
  880. return "Move method to a protocol:";
  881. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  882. messageSends: []}),
  883. smalltalk.HLMoveMethodToProtocolCommand);
  884. smalltalk.addMethod(
  885. smalltalk.method({
  886. selector: "isInputRequired",
  887. fn: function (){
  888. var self=this;
  889. return smalltalk.withContext(function($ctx1) {
  890. return true;
  891. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  892. messageSends: []}),
  893. smalltalk.HLMoveMethodToProtocolCommand);
  894. smalltalk.addMethod(
  895. smalltalk.method({
  896. selector: "key",
  897. fn: function (){
  898. var self=this;
  899. return smalltalk.withContext(function($ctx1) {
  900. return "t";
  901. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  902. messageSends: []}),
  903. smalltalk.HLMoveMethodToProtocolCommand.klass);
  904. smalltalk.addMethod(
  905. smalltalk.method({
  906. selector: "label",
  907. fn: function (){
  908. var self=this;
  909. return smalltalk.withContext(function($ctx1) {
  910. return "to protocol";
  911. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  912. messageSends: []}),
  913. smalltalk.HLMoveMethodToProtocolCommand.klass);
  914. smalltalk.addMethod(
  915. smalltalk.method({
  916. selector: "menuLabel",
  917. fn: function (){
  918. var self=this;
  919. return smalltalk.withContext(function($ctx1) {
  920. return "Move to protocol...";
  921. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  922. messageSends: []}),
  923. smalltalk.HLMoveMethodToProtocolCommand.klass);
  924. smalltalk.addClass('HLRemoveCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  925. smalltalk.addMethod(
  926. smalltalk.method({
  927. selector: "key",
  928. fn: function (){
  929. var self=this;
  930. return smalltalk.withContext(function($ctx1) {
  931. return "x";
  932. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})},
  933. messageSends: []}),
  934. smalltalk.HLRemoveCommand.klass);
  935. smalltalk.addMethod(
  936. smalltalk.method({
  937. selector: "label",
  938. fn: function (){
  939. var self=this;
  940. return smalltalk.withContext(function($ctx1) {
  941. return "Remove";
  942. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})},
  943. messageSends: []}),
  944. smalltalk.HLRemoveCommand.klass);
  945. smalltalk.addClass('HLRemoveClassCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser');
  946. smalltalk.addMethod(
  947. smalltalk.method({
  948. selector: "category",
  949. fn: function (){
  950. var self=this;
  951. return smalltalk.withContext(function($ctx1) {
  952. return "Classes";
  953. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveClassCommand)})},
  954. messageSends: []}),
  955. smalltalk.HLRemoveClassCommand);
  956. smalltalk.addMethod(
  957. smalltalk.method({
  958. selector: "execute",
  959. fn: function (){
  960. var self=this;
  961. return smalltalk.withContext(function($ctx1) {
  962. _st(_st(self)._model())._removeClass();
  963. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveClassCommand)})},
  964. messageSends: ["removeClass", "model"]}),
  965. smalltalk.HLRemoveClassCommand);
  966. smalltalk.addMethod(
  967. smalltalk.method({
  968. selector: "isActive",
  969. fn: function (){
  970. var self=this;
  971. return smalltalk.withContext(function($ctx1) {
  972. var $1;
  973. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  974. return $1;
  975. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveClassCommand)})},
  976. messageSends: ["notNil", "selectedClass", "model"]}),
  977. smalltalk.HLRemoveClassCommand);
  978. smalltalk.addMethod(
  979. smalltalk.method({
  980. selector: "key",
  981. fn: function (){
  982. var self=this;
  983. return smalltalk.withContext(function($ctx1) {
  984. return "c";
  985. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveClassCommand.klass)})},
  986. messageSends: []}),
  987. smalltalk.HLRemoveClassCommand.klass);
  988. smalltalk.addMethod(
  989. smalltalk.method({
  990. selector: "label",
  991. fn: function (){
  992. var self=this;
  993. return smalltalk.withContext(function($ctx1) {
  994. return "Class";
  995. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveClassCommand.klass)})},
  996. messageSends: []}),
  997. smalltalk.HLRemoveClassCommand.klass);
  998. smalltalk.addMethod(
  999. smalltalk.method({
  1000. selector: "menuLabel",
  1001. fn: function (){
  1002. var self=this;
  1003. return smalltalk.withContext(function($ctx1) {
  1004. return "Remove class";
  1005. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveClassCommand.klass)})},
  1006. messageSends: []}),
  1007. smalltalk.HLRemoveClassCommand.klass);
  1008. smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser');
  1009. smalltalk.addMethod(
  1010. smalltalk.method({
  1011. selector: "category",
  1012. fn: function (){
  1013. var self=this;
  1014. return smalltalk.withContext(function($ctx1) {
  1015. return "Methods";
  1016. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveMethodCommand)})},
  1017. messageSends: []}),
  1018. smalltalk.HLRemoveMethodCommand);
  1019. smalltalk.addMethod(
  1020. smalltalk.method({
  1021. selector: "execute",
  1022. fn: function (){
  1023. var self=this;
  1024. return smalltalk.withContext(function($ctx1) {
  1025. _st(_st(self)._model())._removeMethod();
  1026. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveMethodCommand)})},
  1027. messageSends: ["removeMethod", "model"]}),
  1028. smalltalk.HLRemoveMethodCommand);
  1029. smalltalk.addMethod(
  1030. smalltalk.method({
  1031. selector: "isActive",
  1032. fn: function (){
  1033. var self=this;
  1034. return smalltalk.withContext(function($ctx1) {
  1035. var $1;
  1036. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  1037. return $1;
  1038. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveMethodCommand)})},
  1039. messageSends: ["notNil", "selectedMethod", "model"]}),
  1040. smalltalk.HLRemoveMethodCommand);
  1041. smalltalk.addMethod(
  1042. smalltalk.method({
  1043. selector: "key",
  1044. fn: function (){
  1045. var self=this;
  1046. return smalltalk.withContext(function($ctx1) {
  1047. return "m";
  1048. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})},
  1049. messageSends: []}),
  1050. smalltalk.HLRemoveMethodCommand.klass);
  1051. smalltalk.addMethod(
  1052. smalltalk.method({
  1053. selector: "label",
  1054. fn: function (){
  1055. var self=this;
  1056. return smalltalk.withContext(function($ctx1) {
  1057. return "Method";
  1058. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})},
  1059. messageSends: []}),
  1060. smalltalk.HLRemoveMethodCommand.klass);
  1061. smalltalk.addMethod(
  1062. smalltalk.method({
  1063. selector: "menuLabel",
  1064. fn: function (){
  1065. var self=this;
  1066. return smalltalk.withContext(function($ctx1) {
  1067. return "Remove method";
  1068. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveMethodCommand.klass)})},
  1069. messageSends: []}),
  1070. smalltalk.HLRemoveMethodCommand.klass);
  1071. smalltalk.addClass('HLRemoveProtocolCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser');
  1072. smalltalk.addMethod(
  1073. smalltalk.method({
  1074. selector: "category",
  1075. fn: function (){
  1076. var self=this;
  1077. return smalltalk.withContext(function($ctx1) {
  1078. return "Protocols";
  1079. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRemoveProtocolCommand)})},
  1080. messageSends: []}),
  1081. smalltalk.HLRemoveProtocolCommand);
  1082. smalltalk.addMethod(
  1083. smalltalk.method({
  1084. selector: "execute",
  1085. fn: function (){
  1086. var self=this;
  1087. return smalltalk.withContext(function($ctx1) {
  1088. _st(_st(self)._model())._removeProtocol();
  1089. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveProtocolCommand)})},
  1090. messageSends: ["removeProtocol", "model"]}),
  1091. smalltalk.HLRemoveProtocolCommand);
  1092. smalltalk.addMethod(
  1093. smalltalk.method({
  1094. selector: "isActive",
  1095. fn: function (){
  1096. var self=this;
  1097. return smalltalk.withContext(function($ctx1) {
  1098. var $1;
  1099. $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
  1100. return $1;
  1101. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveProtocolCommand)})},
  1102. messageSends: ["notNil", "selectedProtocol", "model"]}),
  1103. smalltalk.HLRemoveProtocolCommand);
  1104. smalltalk.addMethod(
  1105. smalltalk.method({
  1106. selector: "key",
  1107. fn: function (){
  1108. var self=this;
  1109. return smalltalk.withContext(function($ctx1) {
  1110. return "t";
  1111. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  1112. messageSends: []}),
  1113. smalltalk.HLRemoveProtocolCommand.klass);
  1114. smalltalk.addMethod(
  1115. smalltalk.method({
  1116. selector: "label",
  1117. fn: function (){
  1118. var self=this;
  1119. return smalltalk.withContext(function($ctx1) {
  1120. return "Protocol";
  1121. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  1122. messageSends: []}),
  1123. smalltalk.HLRemoveProtocolCommand.klass);
  1124. smalltalk.addMethod(
  1125. smalltalk.method({
  1126. selector: "menuLabel",
  1127. fn: function (){
  1128. var self=this;
  1129. return smalltalk.withContext(function($ctx1) {
  1130. return "Remove protocol";
  1131. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveProtocolCommand.klass)})},
  1132. messageSends: []}),
  1133. smalltalk.HLRemoveProtocolCommand.klass);
  1134. smalltalk.addClass('HLRenameCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  1135. smalltalk.addMethod(
  1136. smalltalk.method({
  1137. selector: "key",
  1138. fn: function (){
  1139. var self=this;
  1140. return smalltalk.withContext(function($ctx1) {
  1141. return "r";
  1142. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameCommand.klass)})},
  1143. messageSends: []}),
  1144. smalltalk.HLRenameCommand.klass);
  1145. smalltalk.addMethod(
  1146. smalltalk.method({
  1147. selector: "label",
  1148. fn: function (){
  1149. var self=this;
  1150. return smalltalk.withContext(function($ctx1) {
  1151. return "Rename";
  1152. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameCommand.klass)})},
  1153. messageSends: []}),
  1154. smalltalk.HLRenameCommand.klass);
  1155. smalltalk.addClass('HLRenameClassCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Browser');
  1156. smalltalk.addMethod(
  1157. smalltalk.method({
  1158. selector: "category",
  1159. fn: function (){
  1160. var self=this;
  1161. return smalltalk.withContext(function($ctx1) {
  1162. return "Classes";
  1163. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameClassCommand)})},
  1164. messageSends: []}),
  1165. smalltalk.HLRenameClassCommand);
  1166. smalltalk.addMethod(
  1167. smalltalk.method({
  1168. selector: "defaultInput",
  1169. fn: function (){
  1170. var self=this;
  1171. return smalltalk.withContext(function($ctx1) {
  1172. var $1;
  1173. $1=_st(_st(_st(self)._model())._selectedClass())._name();
  1174. return $1;
  1175. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameClassCommand)})},
  1176. messageSends: ["name", "selectedClass", "model"]}),
  1177. smalltalk.HLRenameClassCommand);
  1178. smalltalk.addMethod(
  1179. smalltalk.method({
  1180. selector: "displayLabel",
  1181. fn: function (){
  1182. var self=this;
  1183. return smalltalk.withContext(function($ctx1) {
  1184. return "Rename class to:";
  1185. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameClassCommand)})},
  1186. messageSends: []}),
  1187. smalltalk.HLRenameClassCommand);
  1188. smalltalk.addMethod(
  1189. smalltalk.method({
  1190. selector: "execute",
  1191. fn: function (){
  1192. var self=this;
  1193. return smalltalk.withContext(function($ctx1) {
  1194. _st(_st(self)._model())._renameClassTo_(_st(self)._input());
  1195. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameClassCommand)})},
  1196. messageSends: ["renameClassTo:", "input", "model"]}),
  1197. smalltalk.HLRenameClassCommand);
  1198. smalltalk.addMethod(
  1199. smalltalk.method({
  1200. selector: "isActive",
  1201. fn: function (){
  1202. var self=this;
  1203. return smalltalk.withContext(function($ctx1) {
  1204. var $1;
  1205. $1=_st(_st(_st(self)._model())._selectedClass())._notNil();
  1206. return $1;
  1207. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameClassCommand)})},
  1208. messageSends: ["notNil", "selectedClass", "model"]}),
  1209. smalltalk.HLRenameClassCommand);
  1210. smalltalk.addMethod(
  1211. smalltalk.method({
  1212. selector: "isInputRequired",
  1213. fn: function (){
  1214. var self=this;
  1215. return smalltalk.withContext(function($ctx1) {
  1216. return true;
  1217. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameClassCommand)})},
  1218. messageSends: []}),
  1219. smalltalk.HLRenameClassCommand);
  1220. smalltalk.addMethod(
  1221. smalltalk.method({
  1222. selector: "key",
  1223. fn: function (){
  1224. var self=this;
  1225. return smalltalk.withContext(function($ctx1) {
  1226. return "c";
  1227. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameClassCommand.klass)})},
  1228. messageSends: []}),
  1229. smalltalk.HLRenameClassCommand.klass);
  1230. smalltalk.addMethod(
  1231. smalltalk.method({
  1232. selector: "label",
  1233. fn: function (){
  1234. var self=this;
  1235. return smalltalk.withContext(function($ctx1) {
  1236. return "Class";
  1237. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameClassCommand.klass)})},
  1238. messageSends: []}),
  1239. smalltalk.HLRenameClassCommand.klass);
  1240. smalltalk.addMethod(
  1241. smalltalk.method({
  1242. selector: "menuLabel",
  1243. fn: function (){
  1244. var self=this;
  1245. return smalltalk.withContext(function($ctx1) {
  1246. return "Rename class...";
  1247. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameClassCommand.klass)})},
  1248. messageSends: []}),
  1249. smalltalk.HLRenameClassCommand.klass);
  1250. smalltalk.addClass('HLRenameProtocolCommand', smalltalk.HLRenameCommand, [], 'Helios-Commands-Browser');
  1251. smalltalk.addMethod(
  1252. smalltalk.method({
  1253. selector: "category",
  1254. fn: function (){
  1255. var self=this;
  1256. return smalltalk.withContext(function($ctx1) {
  1257. return "Protocols";
  1258. }, function($ctx1) {$ctx1.fill(self,"category",{},smalltalk.HLRenameProtocolCommand)})},
  1259. messageSends: []}),
  1260. smalltalk.HLRenameProtocolCommand);
  1261. smalltalk.addMethod(
  1262. smalltalk.method({
  1263. selector: "defaultInput",
  1264. fn: function (){
  1265. var self=this;
  1266. return smalltalk.withContext(function($ctx1) {
  1267. var $1;
  1268. $1=_st(_st(self)._model())._selectedProtocol();
  1269. return $1;
  1270. }, function($ctx1) {$ctx1.fill(self,"defaultInput",{},smalltalk.HLRenameProtocolCommand)})},
  1271. messageSends: ["selectedProtocol", "model"]}),
  1272. smalltalk.HLRenameProtocolCommand);
  1273. smalltalk.addMethod(
  1274. smalltalk.method({
  1275. selector: "displayLabel",
  1276. fn: function (){
  1277. var self=this;
  1278. return smalltalk.withContext(function($ctx1) {
  1279. return "Rename protocol to:";
  1280. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLRenameProtocolCommand)})},
  1281. messageSends: []}),
  1282. smalltalk.HLRenameProtocolCommand);
  1283. smalltalk.addMethod(
  1284. smalltalk.method({
  1285. selector: "execute",
  1286. fn: function (){
  1287. var self=this;
  1288. return smalltalk.withContext(function($ctx1) {
  1289. _st(_st(self)._model())._renameProtocolTo_(_st(self)._input());
  1290. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRenameProtocolCommand)})},
  1291. messageSends: ["renameProtocolTo:", "input", "model"]}),
  1292. smalltalk.HLRenameProtocolCommand);
  1293. smalltalk.addMethod(
  1294. smalltalk.method({
  1295. selector: "isActive",
  1296. fn: function (){
  1297. var self=this;
  1298. return smalltalk.withContext(function($ctx1) {
  1299. var $1;
  1300. $1=_st(_st(_st(self)._model())._selectedProtocol())._notNil();
  1301. return $1;
  1302. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRenameProtocolCommand)})},
  1303. messageSends: ["notNil", "selectedProtocol", "model"]}),
  1304. smalltalk.HLRenameProtocolCommand);
  1305. smalltalk.addMethod(
  1306. smalltalk.method({
  1307. selector: "isInputRequired",
  1308. fn: function (){
  1309. var self=this;
  1310. return smalltalk.withContext(function($ctx1) {
  1311. return true;
  1312. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLRenameProtocolCommand)})},
  1313. messageSends: []}),
  1314. smalltalk.HLRenameProtocolCommand);
  1315. smalltalk.addMethod(
  1316. smalltalk.method({
  1317. selector: "key",
  1318. fn: function (){
  1319. var self=this;
  1320. return smalltalk.withContext(function($ctx1) {
  1321. return "t";
  1322. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1323. messageSends: []}),
  1324. smalltalk.HLRenameProtocolCommand.klass);
  1325. smalltalk.addMethod(
  1326. smalltalk.method({
  1327. selector: "label",
  1328. fn: function (){
  1329. var self=this;
  1330. return smalltalk.withContext(function($ctx1) {
  1331. return "Protocol";
  1332. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1333. messageSends: []}),
  1334. smalltalk.HLRenameProtocolCommand.klass);
  1335. smalltalk.addMethod(
  1336. smalltalk.method({
  1337. selector: "menuLabel",
  1338. fn: function (){
  1339. var self=this;
  1340. return smalltalk.withContext(function($ctx1) {
  1341. return "Rename protocol...";
  1342. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRenameProtocolCommand.klass)})},
  1343. messageSends: []}),
  1344. smalltalk.HLRenameProtocolCommand.klass);
  1345. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  1346. smalltalk.addMethod(
  1347. smalltalk.method({
  1348. selector: "key",
  1349. fn: function (){
  1350. var self=this;
  1351. return smalltalk.withContext(function($ctx1) {
  1352. return "t";
  1353. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
  1354. messageSends: []}),
  1355. smalltalk.HLToggleCommand.klass);
  1356. smalltalk.addMethod(
  1357. smalltalk.method({
  1358. selector: "label",
  1359. fn: function (){
  1360. var self=this;
  1361. return smalltalk.withContext(function($ctx1) {
  1362. return "Toggle";
  1363. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
  1364. messageSends: []}),
  1365. smalltalk.HLToggleCommand.klass);
  1366. smalltalk.addClass('HLToggleClassCommentCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  1367. smalltalk.addMethod(
  1368. smalltalk.method({
  1369. selector: "execute",
  1370. fn: function (){
  1371. var self=this;
  1372. return smalltalk.withContext(function($ctx1) {
  1373. _st(_st(self)._model())._showComment_(true);
  1374. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassCommentCommand)})},
  1375. messageSends: ["showComment:", "model"]}),
  1376. smalltalk.HLToggleClassCommentCommand);
  1377. smalltalk.addMethod(
  1378. smalltalk.method({
  1379. selector: "key",
  1380. fn: function (){
  1381. var self=this;
  1382. return smalltalk.withContext(function($ctx1) {
  1383. return "d";
  1384. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassCommentCommand.klass)})},
  1385. messageSends: []}),
  1386. smalltalk.HLToggleClassCommentCommand.klass);
  1387. smalltalk.addMethod(
  1388. smalltalk.method({
  1389. selector: "label",
  1390. fn: function (){
  1391. var self=this;
  1392. return smalltalk.withContext(function($ctx1) {
  1393. return "Documentation";
  1394. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassCommentCommand.klass)})},
  1395. messageSends: []}),
  1396. smalltalk.HLToggleClassCommentCommand.klass);
  1397. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  1398. smalltalk.addMethod(
  1399. smalltalk.method({
  1400. selector: "execute",
  1401. fn: function (){
  1402. var self=this;
  1403. return smalltalk.withContext(function($ctx1) {
  1404. _st(_st(self)._model())._showInstance_(false);
  1405. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
  1406. messageSends: ["showInstance:", "model"]}),
  1407. smalltalk.HLToggleClassSideCommand);
  1408. smalltalk.addMethod(
  1409. smalltalk.method({
  1410. selector: "key",
  1411. fn: function (){
  1412. var self=this;
  1413. return smalltalk.withContext(function($ctx1) {
  1414. return "c";
  1415. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
  1416. messageSends: []}),
  1417. smalltalk.HLToggleClassSideCommand.klass);
  1418. smalltalk.addMethod(
  1419. smalltalk.method({
  1420. selector: "label",
  1421. fn: function (){
  1422. var self=this;
  1423. return smalltalk.withContext(function($ctx1) {
  1424. return "Class side";
  1425. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
  1426. messageSends: []}),
  1427. smalltalk.HLToggleClassSideCommand.klass);
  1428. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  1429. smalltalk.addMethod(
  1430. smalltalk.method({
  1431. selector: "execute",
  1432. fn: function (){
  1433. var self=this;
  1434. return smalltalk.withContext(function($ctx1) {
  1435. _st(_st(self)._model())._showInstance_(true);
  1436. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
  1437. messageSends: ["showInstance:", "model"]}),
  1438. smalltalk.HLToggleInstanceSideCommand);
  1439. smalltalk.addMethod(
  1440. smalltalk.method({
  1441. selector: "key",
  1442. fn: function (){
  1443. var self=this;
  1444. return smalltalk.withContext(function($ctx1) {
  1445. return "i";
  1446. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  1447. messageSends: []}),
  1448. smalltalk.HLToggleInstanceSideCommand.klass);
  1449. smalltalk.addMethod(
  1450. smalltalk.method({
  1451. selector: "label",
  1452. fn: function (){
  1453. var self=this;
  1454. return smalltalk.withContext(function($ctx1) {
  1455. return "Instance side";
  1456. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  1457. messageSends: []}),
  1458. smalltalk.HLToggleInstanceSideCommand.klass);