[Gtkradiant] problem with shader

[Dirk]

i want a shader that does just make a red surface

textures/test/red
{
   {
   map $whiteimage
   rgbGen const ( 1.0 0.0 0.0 )
   blendFunc add
   }
   {
   map $lightmap
   rgbGen identity
   blendFunc filter
   }
}

...but why is it transparent?

Can anyone help? or point me to a place where someone can help? I have
had a look at the Q3A shader manual.. but this is the best I can come up
with after having read it...