home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 123 / af123a.adf / af123a2.lzx / Selector / pref / textback2 < prev    next >
Encoding:
Text File  |  1999-03-04  |  271 b   |  15 lines

  1. getline env:selector.settings opa " textcol "
  2. chopword opa epa
  3. chopword opa fg
  4. if "$fg" EQ ""
  5.     setenv fg 1
  6. endif
  7.  
  8. selector >env:opa /pref/textback.sel
  9.  
  10. if not "$opa" EQ ""
  11.     setenv epa "textcol $fg $opa"
  12.     changeline env:selector.settings epa " textcol "
  13. endif
  14.  
  15. unsetenv fg