Skip to content

Commit

Permalink
Correct the name of the map receiver component
Browse files Browse the repository at this point in the history
  • Loading branch information
labordep committed Oct 28, 2023
1 parent d42502c commit 93e26bd
Show file tree
Hide file tree
Showing 2 changed files with 11 additions and 11 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -53,7 +53,7 @@ MolGeoPosApplication >> initialize [
MolGeoPosApplication >> makeAndStartMapComponent [

| mapElement |
mapElement := MolGeoPositionMapReicever start.
mapElement := MolGeoPosMapReceiver start.
mapElement backgroundForm: self mapForm.
mapElement size: self maximumMapSize.
^ mapElement
Expand Down
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
Class {
#name : #MolGeoPositionMapReicever,
#name : #MolGeoPosMapReceiver,
#superclass : #BlElement,
#traits : 'MolGeoPosReceiverType + MolGeoPosEquipmentEvents + MolComponentImpl',
#classTraits : 'MolGeoPosReceiverType classTrait + MolGeoPosEquipmentEvents classTrait + MolComponentImpl classTrait',
Expand All @@ -12,7 +12,7 @@ Class {
}

{ #category : #'pyramid-serialized-bloc' }
MolGeoPositionMapReicever class >> pystonSpec [
MolGeoPosMapReceiver class >> pystonSpec [
"This class has been generated using Pyramid.
By: labordep
Expand Down Expand Up @@ -354,34 +354,34 @@ MolGeoPositionMapReicever class >> pystonSpec [
]

{ #category : #'as yet unclassified' }
MolGeoPositionMapReicever >> backgroundForm: aForm [
MolGeoPosMapReceiver >> backgroundForm: aForm [

(self childWithId: #map) background: aForm.
self size: aForm extent.

]

{ #category : #initialization }
MolGeoPositionMapReicever >> buildElements [
MolGeoPosMapReceiver >> buildElements [

self hasChildren ifTrue: [ self removeChildren ].
self addChildren: self class pystonSpec materializeAsBlElement
]

{ #category : #'life cycle' }
MolGeoPositionMapReicever >> componentActivate [
MolGeoPosMapReceiver >> componentActivate [

self getMolGeoPosEquipmentEventsSubscriber subscribe: self
]

{ #category : #'life cycle' }
MolGeoPositionMapReicever >> componentPassivate [
MolGeoPosMapReceiver >> componentPassivate [

self getMolGeoPosEquipmentEventsSubscriber unsubscribe: self
]

{ #category : #events }
MolGeoPositionMapReicever >> currentPositionChanged: aGeoPosition [
MolGeoPosMapReceiver >> currentPositionChanged: aGeoPosition [

| adjustedPosition radius |
adjustedPosition := aGeoPosition * 50 asPoint + self size / 2.
Expand All @@ -395,7 +395,7 @@ MolGeoPositionMapReicever >> currentPositionChanged: aGeoPosition [
]

{ #category : #'component accessing' }
MolGeoPositionMapReicever >> getMolGeoPosEquipmentEventsSubscriber [
MolGeoPosMapReceiver >> getMolGeoPosEquipmentEventsSubscriber [
| eventsSymbol eventsSubscriber itf |
itf := MolGeoPosEquipmentEvents.
eventsSymbol := self eventsSubscribers at: itf ifAbsent: [^MolNotFoundEventsSubscriber new interface: itf name: nil].
Expand All @@ -407,7 +407,7 @@ MolGeoPositionMapReicever >> getMolGeoPosEquipmentEventsSubscriber [
]

{ #category : #'component accessing' }
MolGeoPositionMapReicever >> getMolGeoPosEquipmentServicesProvider [
MolGeoPosMapReceiver >> getMolGeoPosEquipmentServicesProvider [
| servicesSymbol servicesProvider itf |

itf := MolGeoPosEquipmentServices.
Expand All @@ -419,7 +419,7 @@ MolGeoPositionMapReicever >> getMolGeoPosEquipmentServicesProvider [
]

{ #category : #'life cycle' }
MolGeoPositionMapReicever >> initialize [
MolGeoPosMapReceiver >> initialize [

super initialize.
self buildElements.
Expand Down

0 comments on commit 93e26bd

Please sign in to comment.