Changeset 4615 for trunk/tools


Ignore:
Timestamp:
Nov 19, 2000, 9:22:30 AM (25 years ago)
Author:
bird
Message:

Changed output.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tools/bin/DoWithDirs.cmd

    r3092 r4615  
    1 /* $Id: DoWithDirs.cmd,v 1.5 2000-03-11 18:52:49 bird Exp $
     1/* $Id: DoWithDirs.cmd,v 1.6 2000-11-19 08:22:30 bird Exp $
    22 *
    33 * Syntax: dowithdirs.cmd [-e<list of excludes>] [-c] [-i] [-l] [-r] <cmd with args...>
     
    140140            do
    141141                /* exectute the command in the directory */
    142                 say '# entering directory:' asDirs.i;
     142                say '[Entering directory:' asDirs.i']';
    143143                /* save old dir and enter the new dir. */
    144144                sOldDir = directory();
     
    154154                            /* restore old directory and return sucessfully */
    155155                            call directory sOldDir;
    156                             say '# - Lock found, stops processing.';
     156                            say '[ - Lock found, stops processing.]';
    157157                            exit(0);
    158158                        end
    159                         say '# - warning: Skipping '|| asDirs.i || ' - directory was locked.';
     159                        say '[ - warning: Skipping '|| asDirs.i || ' - directory was locked.]';
    160160                        fOK = 0;
    161161                    end
     
    176176                    do
    177177                        /* complain and fail if errors aren't ignored. */
    178                         say '# - rc = 'ret;
     178                        say '[ - rc = 'ret']';
    179179                        if (\fIgnoreFailure) then
    180180                            exit(rc);
     
    183183
    184184                /* restore old directory */
     185                say '[Leaving  directory:' directory()']'
    185186                call directory sOldDir;
    186187            end
     
    191192                if (rc <> 0) then
    192193                do
    193                     say '# - rc = ' || rc;
     194                    say '[ - rc = ' || rc']';
    194195                    if (\fIgnoreFailure) then
    195196                        exit(rc);
Note: See TracChangeset for help on using the changeset viewer.