home *** CD-ROM | disk | FTP | other *** search
- ; Script d'installation de DiceConfig2.0
- (set name
- (askdir
- (prompt "Where i can creat a directory for DiceConfig20")
- (help @askdir-help)
- (default "Dcc:")
- )
- )
-
- (set name (tackon name "DiceConfig20"))
-
- (debug "Le repertoire est " name)
-
- (if (exists name)
- (if ( = 0 (askbool
- (prompt "\""name"\" already exist !!")
- (help "DiceConfig 2.0 may be already installed ?\n"
- " 'Continue' overwrite older DiceConfig."
- )
- (choices "Continue" "abort" )
- )
- )
- ( abort "user abort !!")
- )
- (makedir name (infos) )
- )
-
- (set @default-dest name)
-
- ; Copie l'éxecutable & les docs
- (copyfiles
- (prompt "Copy DiceConfig2.0 to \""@default-dest"\"")
- (help "Copy DiceConfig2.0's executable and documentations to your own directory\n"
- "'DiceConfig2.0FR.doc' is the french doc file" )
- (source "")
- (choices "DiceConfig2.0" "DiceConfig2.0.doc" "DiceConfig2.0FR.doc" "ATTENTION")
- (dest @default-dest)
- (infos)
- (confirm)
- )
-
- (set name (tackon name "catalogs"))
- (debug "Le repertoire des catalogs est " name)
-
- ; pour la localisation
- ; copylib ne marche pas en récursif
- (copyfiles
- (prompt "Copy catalog(s) in \""name"\"")
- (help @copyfiles-help)
- (source "catalogs")
- (all)
- (infos)
- (dest name)
- (confirm)
- )
-
- ; La config
- (copyfiles
- (prompt "Copy config file in Dcc:Config.\n"
- "Hit 'Help' for IMPORTANT informations !")
- (help "Only 'DiceConfig.cfg' is usefull. 'LF_DiceConfig.cfg' is "
- "only an example.\n"
- "NOTEZ BIEN: DiceConfig NEED 'DiceConfig.cfg' to be in dcc:config"
- "( but you may change destination directory if Dcc: is not assigned )"
- )
- (source "Config")
- (all)
- (infos)
- (dest "Dcc:Config")
- (confirm)
- )
-
- (copyfiles
- (prompt "Copying scripts files")
- (help "Start_Csh is an AmigaDos scripts that start a slave Csh shell\n"
- "Multi_Dcc_F.sh is a Csh 5.31+ script for using -new w/ Dcc V 2.07.54R (see docs)\n"
- "OldMulti_Dcc_F.sh : same script but for Csh lower than 5.31")
- (source "scripts")
- (all)
- (dest "s:")
- (infos)
- (confirm)
- )
-