Path: utzoo!attcan!uunet!husc6!bbn!mit-eddie!bloom-beacon!tut.cis.ohio-state.edu!cs.utexas.edu!milano!titan!janssen@titan.sw.mcc.com
From: janssen@titan.sw.mcc.com (Bill Janssen)
Newsgroups: comp.windows.x
Subject: Re: Captain Defaults vs. the Resource Mangler from Outer Space
Summary: And what about fonts?
Message-ID: <1575@titan.sw.mcc.com>
Date: 14 Nov 88 10:36:20 GMT
Sender: janssen@titan.sw.mcc.com
Lines: 25

Ah, it gets worse.  I have two screens, one `75 dpi' (a normal Sun CG2),
and the other `100 dpi', a hi-res sun monochrome.  When I start an xterm
on the `100 dpi', I want it to use courb18, whereas courr14 does quite
well on the `75 dpi' screen.  Similarly, I want to specify different
colors for the color screen than for the monochrome screen.

Perhaps the values in the resources data base could be interpreted functions
which take a single argument, a plist of environment values, and calculate
a return value from them...

(funcall #'(lambda (ENV)
	     (case (getf ENV :dpi)
	       (100 "courb18")
	       (75  "courr14")
	       (t   "courr14"))
	     )
	 '(:host "foo"
	   :screen 3
	   :monochrome-screen t
	   :dpi 100
	   :class "xterm")
	 )

--
'(:poster "Bill")