Moka-Announcements.js 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134
  1. define("amber_core/Moka-Announcements", ["amber_vm/smalltalk", "amber_vm/nil", "amber_vm/_st", "amber_core/Kernel-Objects"], function(smalltalk,nil,_st){
  2. smalltalk.addPackage('Moka-Announcements');
  3. smalltalk.packages["Moka-Announcements"].transport = {"type":"amd","amdNamespace":"amber_core"};
  4. smalltalk.addClass('MKAnnouncement', smalltalk.Object, [], 'Moka-Announcements');
  5. smalltalk.MKAnnouncement.comment="I am the root class of all announcements sent in Moka.";
  6. smalltalk.addClass('MKAspectChanged', smalltalk.MKAnnouncement, ['aspect'], 'Moka-Announcements');
  7. smalltalk.MKAspectChanged.comment="I am announced whenever an `aspect` is changed.\x0a\x0a## API\x0a\x0aCreate instances using the class-side method `#aspect:`";
  8. smalltalk.addMethod(
  9. smalltalk.method({
  10. selector: "aspect",
  11. category: 'accessing',
  12. fn: function (){
  13. var self=this;
  14. return smalltalk.withContext(function($ctx1) {
  15. var $1;
  16. $1=self["@aspect"];
  17. return $1;
  18. }, function($ctx1) {$ctx1.fill(self,"aspect",{},smalltalk.MKAspectChanged)})},
  19. args: [],
  20. source: "aspect\x0a\x09^ aspect",
  21. messageSends: [],
  22. referencedClasses: []
  23. }),
  24. smalltalk.MKAspectChanged);
  25. smalltalk.addMethod(
  26. smalltalk.method({
  27. selector: "aspect:",
  28. category: 'accessing',
  29. fn: function (aSelector){
  30. var self=this;
  31. return smalltalk.withContext(function($ctx1) {
  32. self["@aspect"]=aSelector;
  33. return self}, function($ctx1) {$ctx1.fill(self,"aspect:",{aSelector:aSelector},smalltalk.MKAspectChanged)})},
  34. args: ["aSelector"],
  35. source: "aspect: aSelector\x0a\x09aspect := aSelector",
  36. messageSends: [],
  37. referencedClasses: []
  38. }),
  39. smalltalk.MKAspectChanged);
  40. smalltalk.addMethod(
  41. smalltalk.method({
  42. selector: "aspect:",
  43. category: 'instance creation',
  44. fn: function (aSelector){
  45. var self=this;
  46. return smalltalk.withContext(function($ctx1) {
  47. var $2,$3,$1;
  48. $2=self._new();
  49. _st($2)._aspect_(aSelector);
  50. $3=_st($2)._yourself();
  51. $1=$3;
  52. return $1;
  53. }, function($ctx1) {$ctx1.fill(self,"aspect:",{aSelector:aSelector},smalltalk.MKAspectChanged.klass)})},
  54. args: ["aSelector"],
  55. source: "aspect: aSelector\x0a\x09^ self new\x0a\x09\x09aspect: aSelector;\x0a\x09\x09yourself",
  56. messageSends: ["aspect:", "new", "yourself"],
  57. referencedClasses: []
  58. }),
  59. smalltalk.MKAspectChanged.klass);
  60. smalltalk.addClass('MKViewAnnouncement', smalltalk.MKAnnouncement, ['view'], 'Moka-Announcements');
  61. smalltalk.MKViewAnnouncement.comment="I am the root class of all viewn announcements. I hold a `view` object.\x0a\x0a## API\x0a\x0aCreate instance with the class-side method `#view:`";
  62. smalltalk.addMethod(
  63. smalltalk.method({
  64. selector: "view",
  65. category: 'accessing',
  66. fn: function (){
  67. var self=this;
  68. return smalltalk.withContext(function($ctx1) {
  69. var $1;
  70. $1=self["@view"];
  71. return $1;
  72. }, function($ctx1) {$ctx1.fill(self,"view",{},smalltalk.MKViewAnnouncement)})},
  73. args: [],
  74. source: "view\x0a\x09^ view",
  75. messageSends: [],
  76. referencedClasses: []
  77. }),
  78. smalltalk.MKViewAnnouncement);
  79. smalltalk.addMethod(
  80. smalltalk.method({
  81. selector: "view:",
  82. category: 'accessing',
  83. fn: function (aView){
  84. var self=this;
  85. return smalltalk.withContext(function($ctx1) {
  86. self["@view"]=aView;
  87. return self}, function($ctx1) {$ctx1.fill(self,"view:",{aView:aView},smalltalk.MKViewAnnouncement)})},
  88. args: ["aView"],
  89. source: "view: aView\x0a\x09view := aView",
  90. messageSends: [],
  91. referencedClasses: []
  92. }),
  93. smalltalk.MKViewAnnouncement);
  94. smalltalk.addMethod(
  95. smalltalk.method({
  96. selector: "view:",
  97. category: 'instance creation',
  98. fn: function (aView){
  99. var self=this;
  100. return smalltalk.withContext(function($ctx1) {
  101. var $2,$3,$1;
  102. $2=self._new();
  103. _st($2)._view_(aView);
  104. $3=_st($2)._yourself();
  105. $1=$3;
  106. return $1;
  107. }, function($ctx1) {$ctx1.fill(self,"view:",{aView:aView},smalltalk.MKViewAnnouncement.klass)})},
  108. args: ["aView"],
  109. source: "view: aView\x0a\x09^ self new\x0a\x09\x09view: aView;\x0a\x09\x09yourself",
  110. messageSends: ["view:", "new", "yourself"],
  111. referencedClasses: []
  112. }),
  113. smalltalk.MKViewAnnouncement.klass);
  114. smalltalk.addClass('MKViewRemoved', smalltalk.MKViewAnnouncement, [], 'Moka-Announcements');
  115. smalltalk.MKViewRemoved.comment="I am announced when a view gets removed from the DOM.";
  116. smalltalk.addClass('MKViewScroll', smalltalk.MKViewAnnouncement, [], 'Moka-Announcements');
  117. smalltalk.MKViewScroll.comment="I am often used in conjunction with `MKScrollDecorator`.\x0a\x0aI am announced when a view's scroll changed programatically";
  118. });