home *** CD-ROM | disk | FTP | other *** search
/ DOpus Plus / DOpus Plus.iso / Tutorial / HTML / Scripts / Remove_Assigns < prev   
Encoding:
Text File  |  1998-10-28  |  768 b   |  28 lines
  1. ;$ver 1.0 DOPlus CD setup Remove assigns script for DOpusPLUS CD
  2.  
  3. ;***************************************************************************
  4. ; Check to see if this script has already been run and remove assigns if so
  5. ;
  6. If exists ENV:DOPlus_Assigns
  7.   Set choice `RequestChoice $reqtitle "Removing the assigns to DOPlus CD" OK Cancel`
  8.   If $choice EQ 1
  9.     Delete >NIL: ENV:DOPlus_Assigns
  10.     Assign Fonts:   DOPLUS:Fonts remove
  11.   
  12.     if exists ENV:DOPLUS_MUI
  13.       Delete >NIL: ENV:DOPLUS_MUI
  14.       if exists MUI:Docs
  15.         assign  HELP: MUI:Docs remove
  16.       endif
  17.       if exists MUI:Locale
  18.         assign LOCALE: MUI:Locale remove
  19.       endif
  20.  
  21.       if exists MUI:Libs
  22.         assign LIBS: MUI:Libs remove
  23.       endif
  24.     assign MUI: 
  25.     EndIf
  26.   endif  
  27. Endif
  28.