diff --git a/coders/hald.c b/coders/hald.c
index edecbb4..0d1ecda 100644
--- a/coders/hald.c
+++ b/coders/hald.c
@@ -156,7 +156,7 @@
         q->red=RoundToQuantum(QuantumRange*red/(cube_size-1.0));
         q->green=RoundToQuantum(QuantumRange*green/(cube_size-1.0));
         q->blue=RoundToQuantum(QuantumRange*blue/(cube_size-1.0));
-        q->opacity=OpaqueOpacity;
+        SetOpacitySample(q,OpaqueOpacity);
         q++;
       }
     }