diff --git a/src/GeoView-Tests/AbstractGeoViewGraphicModelLayerTest.class.st b/src/GeoView-Tests/AbstractGeoViewGraphicModelLayerTest.class.st
index 2771c9a..c0d1573 100644
--- a/src/GeoView-Tests/AbstractGeoViewGraphicModelLayerTest.class.st
+++ b/src/GeoView-Tests/AbstractGeoViewGraphicModelLayerTest.class.st
@@ -160,6 +160,19 @@ AbstractGeoViewGraphicModelLayerTest >> testReachMaximumDisplayedObjects [
 	self deny: layer isMaximumDisplayedObjectsReach.
 ]
 
+{ #category : #tests }
+AbstractGeoViewGraphicModelLayerTest >> testSetSymbologyProvider [
+
+	| processSymbol |
+	self assert: layer symbologyProvider isNil.
+	
+	processSymbol := layer graphicModel getProcessDataForClass: SmockDSymbol.
+
+	layer setSymbologyProvider: SmockSymbologyProvider new.
+	
+	self deny: layer symbologyProvider isNil
+]
+
 { #category : #tests }
 AbstractGeoViewGraphicModelLayerTest >> testSortDatas [
 	
diff --git a/src/GeoView/AbstractGeoViewGraphicModelLayer.class.st b/src/GeoView/AbstractGeoViewGraphicModelLayer.class.st
index 369560a..6486cd2 100644
--- a/src/GeoView/AbstractGeoViewGraphicModelLayer.class.st
+++ b/src/GeoView/AbstractGeoViewGraphicModelLayer.class.st
@@ -441,6 +441,13 @@ AbstractGeoViewGraphicModelLayer >> sendSortRequest [
 	self announcer announce: announcement
 ]
 
+{ #category : #'API -- symbology' }
+AbstractGeoViewGraphicModelLayer >> setSymbologyProvider: aSymbologyProvider [
+
+	self symbologyProvider: aSymbologyProvider.
+	self updateModel: SmockSymbologyChanges new
+]
+
 { #category : #'private - sort' }
 AbstractGeoViewGraphicModelLayer >> sortDatas [
 	"force sorted to remove and add datas - execute my only with a bloc command applier - return true / false if need to repaint"