No Constant Properties exported for Optical surfaces

[KoljaFrahm]

Check duplicate issues.

• Checked for duplicates

Description

If I look at TGDMLWrite.cxx, in XMLNodePointer_t TGDMLWrite::CreateOpticalSurfaceN(TGeoOpticalSurface *geoSurf), there is no geoSurf->GetConstProperties() part which means no Constant properties are written to the gdml.
(An equivalent with GetConstProperties() exists in XMLNodePointer_t TGDMLWrite::CreateMaterialN(TGeoMaterial *material, TString mname))
Is this a bug or am I missing something?

Reproducer

Export an Optical Surface with constant properties

ROOT version

master

Installation method

all

Operating system

all

Additional context

No response