Changeset 1825
- Timestamp:
- Jul 2, 2015, 11:15:59 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cfgmgr.cmd
r1758 r1825 79 79 * 80 80 * The following code 81 * Installs default files if /DEFAU TLS is specified or if a cfg file is missing81 * Installs default files if /DEFAULTS is specified or if a cfg file is missing 82 82 * Handles all /DEINSTALL actions 83 83 * It should precede the call to UpdateArchiverBB2 … … 85 85 */ 86 86 87 /*88 trace '?i'89 */90 87 do f = 1 to cfg.file.0 91 88 file_exists = stream(cfg.file.f.name, 'c' , 'query exists') … … 377 374 * 378 375 parse value SysTextScreenSize() with . cfg.screen_width 379 if cfg.screen_width = 0 then /* for running in PMREXX */376 if cfg.screen_width = 0 then /* for running in PMREXX, EPM, etc. */ 380 377 cfg.screen_width = 80 381 378 */ … … 482 479 reply = translate(strip(SysGetKey())) 483 480 say 484 481 return reply 485 482 486 483 FilesAreDifferent: procedure … … 558 555 say 559 556 say 'If this error continues after re-installing FM/2, contact FM/2 support' 560 say 'through the FM2 USER group on Yahoo.'557 say 'through the FM2_USER group on Netlabs.' 561 558 exit 562 559 … … 768 765 myrc = 0 769 766 770 /* If CFGMGR was called with /DEFAULTS and/or /DEINSTALL parameters 771 then there is nothing to do here! */ 767 /* 768 * If CFGMGR was called with /DEFAULTS and/or /DEINSTALL parameters then there is nothing to do here! 769 */ 772 770 if cfg.defaults = 1 | cfg.operation = 'DEINSTALL' then 773 771 return myrc
Note:
See TracChangeset
for help on using the changeset viewer.