Changeset 42

Show
Ignore:
Timestamp:
02/03/08 13:28:20 (10 months ago)
Author:
cinc
Message:

Use '1' instea of 'yes' as install marker. Set marker at the very beginning to notify classes of installation.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/install/install.CMD

    r12 r42  
    11/*           Install for WPS-Wizard 
    22 * 
    3  *                   (C) Chris Wohlgemuth 2001-2007 
     3 *                   (C) Chris Wohlgemuth 2001-2008 
     4 * 
     5 *  Note that the following license text only applies to this script. 
    46 */ 
    5  
    67/* 
    78 * This program is free software; you can redistribute it and/or modify 
     
    4142 
    4243 
    43 if rc<>"yes" THEN DO 
     44if rc<>"1" THEN DO 
    4445        /* First phase */ 
    4546 
    4647        /* Welcome screen */ 
     48        SAY '' 
    4749        SAY nlsStrings.1 /* 'Be sure to have a backup of your INI-files!' */ 
    4850        SAY nlsStrings.2 /* 'If not abort NOW' */ 
     
    5961        rc=SysIni(, "WPSWizard", "uninstalling", "DELETE:") 
    6062 
     63        /* Mark that we are installing */ 
     64        rc=SysIni(, "WPSWizard", "installing", 1'0'x) 
     65         
    6166        /* 'Current directory is ' */ 
    6267        say nlsStrings.4||curdir 
     
    134139        /* Replacing class */ 
    135140        'bin\repclass WPObject CWObject' 
    136  
    137         rc=SysIni(, "WPSWizard", "installing", "yes") 
    138  
     141         
    139142        PARSE SOURCE . . theScript 
    140143 
     
    168171SAY "" 
    169172 
    170 DO a=10 to 1 BY -1 
     173DO a=15 to 1 BY -1 
    171174        SAY "..."||a||"..." 
    172175        call SysSleep 1 
     
    589592 
    590593unexpectedExit: 
     594 
     595rc=SysIni(, "WPSWizard", "installing", "DELETE:") 
    591596say '' 
    592597say nlsStrings.59