home *** CD-ROM | disk | FTP | other *** search
Fred Fish's Product-Info | 1995-10-24 | 2.6 KB | 110 lines |
- .name
- Deft_II
- .aminet-dir
- util/wb
- .type
- Workbench Tool
- .short
- Recursively modify icon default tools
- .description
- Deft II is an utility to modify the default tools of your icons; you
- give to it a set of paths, a set of old/new default tool couples, and
- Deft II will recursively scan all these paths to change the default
- tools of your project icons according to your preferences.
-
- Deft II is a powerful tool, here are its main features :
- - a MUI GUI with all the consequent convenience for the user
- (keyboard shortcuts, appwindows, etc)
- - multi-paths handling for scanning
- - multi-default tools for replacing
- - wildcard using for the default tools to replace
- - preferences saving
- - ARexx support
- - online help
- .version
- 1.6
- .date
- 1994.11.15
- .author
- Lionel Vintenat
- .distribution
- Copyrighted but Freely Distributable
- .email
- vintenat@reseau.onecert.fr
- .docs
- docs/English/Deft II.guide
- docs/Français/Deft II.guide
- .described-by
- Fred Fish (fnf@amigalib.com)
- .submittal
- Downloaded via ftp from aminet (wuarchive.wustl.edu).
- .execute
- set choice `RequestChoice "Deft II" "Please select an option" "ReadMe" "Guide" "View Sources" "Install" "Run" "Cancel"`
- if $choice EQ "0"
- quit 5
- endif
-
- if $choice EQ "1"
- set lang `RequestChoice "" "Select Language" "english" "français" "Cancel"`
- if $lang EQ "0"
- quit 0
- endif
-
- if $lang EQ "1"
- MetaTool ReadMe.first TEXT
- endif
-
- if $lang EQ "2"
- MetaTool LisezMoi.d_abord TEXT
- endif
- endif
-
- if $choice EQ "2"
- set lang `RequestChoice "" "Select Language" "english" "français" "Cancel"`
-
- if $lang EQ "0"
- quit 0
- endif
-
- if $lang EQ "1"
- cd Docs/English
- MetaTool "Deft II.guide" GUIDE
- endif
-
- if $lang EQ "2"
- cd Docs/Français
- MetaTool "Deft II.guide" GUIDE
- endif
- endif
-
- if $choice EQ "3"
- cd Sources
- set filechoice `RequestFile TITLE "Select File"`
- set dirchoice `pathname $filechoice`
- set filechoice `basename $filechoice`
- failat 21
- cd $dirchoice
- MetaTool $filechoice TEXT
- endif
-
- if $choice EQ "4"
- cd Install
- set lang `RequestChoice "" "Select Language" "english" "deutsch" "français" "Cancel"`
-
- if $lang EQ "1"
- Installer SCRIPT Install APPNAME "Deft II" MINUSER average DEFUSER average NOPRINT LANGUAGE english LOGFILE t:Install_DeftII_log
- endif
-
- if $lang EQ "2"
- Installer SCRIPT Install APPNAME "Deft II" MINUSER average DEFUSER average NOPRINT LANGUAGE deutsch LOGFILE t:Install_DeftII_log
- endif
-
- if $lang EQ "2"
- Installer SCRIPT Install APPNAME "Deft II" MINUSER average DEFUSER average NOPRINT LANGUAGE français LOGFILE t:Install_DeftII_log
- endif
- endif
-
- if $choice EQ "5"
- WBRun "Deft II"
- endif
-