Newsgroups: comp.sys.next
Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!caen!cardamom.engin.umich.edu!dejnsen
From: dejnsen@caen.engin.umich.edu (Nik Anthony Gervae)
Subject: Re: Simple Background
Message-ID: <1991Apr26.034510.10435@engin.umich.edu>
Sender: news@engin.umich.edu (CAEN Netnews)
Organization: University of Michigan Engineering, Ann Arbor
References: <0c5S18W00WBN43XnFM@andrew.cmu.edu>
Date: Fri, 26 Apr 1991 03:45:10 GMT

In article <0c5S18W00WBN43XnFM@andrew.cmu.edu> jy0q+@andrew.cmu.edu (Jules Andrew Yasuna) writes:
>Many users wish to tile the screen background with some tiff file.
>Apparently "Background" will handle this. What I wish to do is
>musch simpler (I think?). All I want is to turn off the grey 
>background in favor of a black background. Now I could effect this
>using "Background" and an all black tiff image, but I was hoping
>to avoid having another background process running. So, the question
>is, is it possible to just turn off the default grey background ?



 Here's a little util I got from someone else on the net (don't know who
at the moment; sorry!). I modified it to just take a fray argument (original
was for color). To use:

  1. Copy this into a file (eg "bgg" for BackGround Gray)
  2. Make the file executable (WM Inspector or UNIX chmod(1)).
  3. Put it someplace nice (a personal bin directory on your search path).
  4. Add the appropriate line to your .login or .cshrc file:
       bgg num
     where num is between 0.0 (black) and 1.0 (white)

  Enjoy!

---8<---8<---8<---
#!/bin/csh -f

#echo $0 : setting background color

/usr/bin/pft << MyEOF > /dev/null

14 windowdeviceround $1 setgray setexposurecolor
14 currentwindowbounds Nonretained window /w exch def
false w setautofill
Above 0 w orderwindow
w termwindow

MyEOF
--
/ Nik Gervae aka dejnsen@caen.engin.umich.edu | "It'll be finished next week, \
| CS/Linguistics stud. & NeRD at UM (go blow) | I promise!"--me               |
|                                             |                               |
| **When all else fails, bug someone who      | "Just say an iguana chewed    |
\   knows (not me!).                          | up your textbook."--Jason Fox /
