;+ ; NAME: getwhite ; PURPOSE: ; return color table index for white, in either X or postscript mode. ; INPUTS: ; KEYWORDS: ; OUTPUTS: ; ; HISTORY: ; Began 2005-10-06 20:34:30 by Marshall Perrin ;- FUNCTION getwhite,black=black if !D.NAME eq "PS" then begin white = !p.background black = !p.color endif else begin black = !p.background white = !p.color endelse return, white end