🚀 go-pugleaf

I prefer to have my displays completely blanked when X is doing screen
saving - this is what the -v flag is supposed to accomplish.  However,
the V10R4 supplied libqvss does not do screen blanking itself, so that
the SetVideo calls in X/main.c don't succeed, so the screen saver routine
does that random pattern on the screen instead.  Rather than doing it 
properly, I put this cheap hack into X/main.c to do it for me.  It's
not elegant, but it has the desired effect at minimal cost.

John Sellens -- Logic Programming and Artificial Intelligence Group

{decvax|utzoo|ihnp4|allegra|clyde}!watmath!watdragon!jmsellens
jmsellens@dragon.waterloo.{edu,CDN} jsellens@watmta.BITNET
jmsellens%dragon@waterloo.csnet

"Of all the stupid things I could have thought, this was the worst"
- Joe Jackson


From X/main.c at line 580: (the only change is using GXclear rather than
CXcopy)

		    StoreColors (2, randomcolors);
		}
#ifdef waterloo
		/* if we wanted the screen blanked, and were able to save the
		   screen, then let's try tiling it with something all black? */
		if ( blank_video && save!=NULL ) {
		    TileFill (rootwindow->tile,
			  (int) (tv.tv_sec >> 4) & 0xf, (int) tv.tv_sec & 0xf,
			  (BITMAP *) NULL, 0, 0, device.width, device.height,
			  &rootwindow->clip, 1, GXclear, -1);
		} else
#endif
		TileFill (rootwindow->tile,
			  (int) (tv.tv_sec >> 4) & 0xf, (int) tv.tv_sec & 0xf,
			  (BITMAP *) NULL, 0, 0, device.width, device.height,
			  &rootwindow->clip, 1, GXcopy, -1);