home *** CD-ROM | disk | FTP | other *** search
- /* REXX installation script for FileBar */
-
- call RxFuncAdd 'SysCls', 'RexxUtil', 'SysCls'
- call RxFuncAdd 'SysCreateObject', 'RexxUtil', 'SysCreateObject'
-
- currentDirectory = directory()
- programName = "\FILEBAR.EXE"
- programPath = insert( currentDirectory, programName )
- executable = insert( "EXENAME=", programPath )
-
- SysCreateObject("WPProgram","FileBar - Version 1.7b","<WP_DESKTOP>",,
- executable, "REPLACE" )
-
- call SysCls
-
- say ""
- say ""
- say "----------------------------------------------------------------"
- say " FileBar - OS/2 Application Launch Facility & Shell Replacement "
- say " Written By Eric A. Wolf - Copr. (C) 1994 - All Rights Reserved "
- say "----------------------------------------------------------------"
- say ""
- say " FileBar object successfully created on desktop..."
- say ""
- say " Start FileBar by double-clicking on the program object. And, "
- say " for future OS/2 sessions, drag this object to your startup "
- say " folder (found in OS/2 System Folder) so that FileBar will be "
- say " executed every time you boot OS/2."
- say ""
- say "*****************************************************************"
- say "* This program is distributed as Shareware! You MUST register *"
- say "* this product if you continue to use it. Please see the *"
- say "* documentation for the complete details. *"
- say "*****************************************************************"
- say ""