home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / sys / sgi / 16351 < prev    next >
Encoding:
Internet Message Format  |  1992-11-12  |  3.3 KB

  1. Path: sparky!uunet!know!mips2!cass.ma02.bull.com!think.com!ames!agate!doc.ic.ac.uk!cc.ic.ac.uk!imperial.ac.uk!vulture
  2. From: vulture@imperial.ac.uk (Thomas Sippel - Dau)
  3. Newsgroups: comp.sys.sgi
  4. Subject: Re: changing icon title dynamically
  5. Message-ID: <1992Nov12.193245.24762@cc.ic.ac.uk>
  6. Date: 12 Nov 92 19:32:45 GMT
  7. References: <1992Nov11.175635.28531@tamsun.tamu.edu> <1drjndINNn25@fido.asd.sgi.com>
  8. Sender: vulture@carrion.cc.ic.ac.uk (Thomas Sippel - Dau)
  9. Reply-To: cmaae47@imperial.ac.uk
  10. Organization: Imperial College of Science, Technology and Medicine
  11. Lines: 73
  12. Nntp-Posting-Host: cscgc
  13.  
  14. In article <1drjndINNn25@fido.asd.sgi.com>, karlton@fudge.asd.sgi.com (Phil Karlton) writes:
  15. - In article <1992Nov11.175635.28531@tamsun.tamu.edu>,
  16. -     vamsee@bioiris.tamu.edu writes:
  17. - > Is there someway to change the icon title dynamically for xwsh ?
  18. .....
  19.  
  20. - Check the xwsh man page. Use a '3' instead of a '1' in the escape
  21. - sequence. Something like
  22. -         echo -n "\033P3.y"${host}"\033\\"
  23.  
  24. or you could try this script (I have it as /usr/bin/cursor, as I used it first
  25. to set the cursor colour. there is no man page, but it has some help with it.
  26.  
  27.                                       Thomas
  28.  
  29. ---8<--- cut here ----- do not fold, twist, or spindle ----- cut here --->8---
  30. #!/bin/ksh
  31. #
  32. #  cursor - set cursor parameter
  33. #
  34.  
  35. if test u = "u$2" -a ! help = "$1"
  36.    then
  37.    string=$(colorview)
  38.    else
  39.    string="$2"
  40.    fi
  41.  
  42. case $1 in
  43.     (back)          print -n "\033P5.y"$string"\033\\";;
  44.     (bold)          print -n "\033P11.y"$string"\033\\";;
  45.     (colour)        print -n "\033P9.y"$string"\033\\";;
  46.     (color)         print -n "\033P9.y"$string"\033\\";;
  47.     (fore)          print -n "\033P4.y"$string"\033\\";;
  48.     (half)          print -n "\033P10.y"$string"\033\\";;
  49.     (icon)          print -n "\033P3.y"$string"\033\\";;
  50.     (name)          print -n "\033P1.y"$string"\033\\";;
  51.     (tcol)          print -n "\033P8.y"$string"\033\\";;
  52.     (text)          print -n "\033P4.y"$string"\033\\";;
  53.     (xback)         print -n "\033P7.y"$string"\033\\";;
  54.     (xfore)         print -n "\033P6.y"$string"\033\\";;
  55.     (*)             cat <<- END
  56.  
  57.            $0 - set various cursor and text colours in winterm
  58.            Syntax: $0 mnemonic value
  59.  
  60.            Mnemonic  Value   Function
  61.            ---------------------------------------------------------
  62.            back      colour  set background colour
  63.            bold      colour  set colour of bold background
  64.            colour    colour  set colour of the text cursor
  65.            half      colour  set colour of half intensity background
  66.            icon      name    set name displayed in icon
  67.            name      name    set name as displayed in title bar
  68.            tcol      colour  set colour of text under the cursor
  69.            text      colour  set foreground text colour
  70.            xback     colour  set colour of selection background
  71.            xfore     colour  set colour of selection text colour
  72.  
  73. END
  74. esac
  75. ---8<--- cut here ----- do not fold, twist, or spindle ----- cut here --->8---
  76.  
  77.  
  78. -- 
  79. *** This is the operative statement, all previous statements are inoperative.
  80. *   email: cmaae47 @ ic.ac.uk (Thomas Sippel - Dau) (uk.ac.ic on Janet)
  81. *   voice: +44 71 589 5111 x4937 or 4934 (day), or +44 71 823 9497 (fax)
  82. *   snail: Imperial College of Science, Technology and Medicine
  83. *   The Center for Computing Services, Kensington SW7 2BX, Great Britain
  84.