diff --git a/coders/pnm.c b/coders/pnm.c
index f3120eb..e743a19 100644
--- a/coders/pnm.c
+++ b/coders/pnm.c
@@ -491,10 +491,9 @@
           for (x=0; x < (long) image->columns; x++)
           {
             intensity=PNMInteger(image,10);
-            if (scale != (Quantum *) NULL)
-              intensity=(unsigned long) scale[ConstrainPixel(image,(long)
-                intensity,max_value)];
             q->red=(Quantum) intensity;
+            if (scale != (Quantum *) NULL)
+              q->red=scale[ConstrainPixel(image,(long) intensity,max_value)];
             q->green=q->red;
             q->blue=q->red;
             q++;