Ralph,
The following changes do not work on win32. On win32 no directories
and files are created and there are no error messages.
This is using cygwin perl v5.8.7.
Janet
Index: makeBaseApp.pl
===================================================================
RCS file:
/usr/local/epicsmgr/cvsroot/epics/base/src/makeBaseApp/makeBaseApp.pl,v
retrieving revision 1.32.2.5
retrieving revision 1.32.2.6
diff -r1.32.2.5 -r1.32.2.6
5c5
< # $Id: makeBaseApp.pl,v 1.32.2.5 2005/05/26 16:00:58 anj Exp $
---
> # $Id: makeBaseApp.pl,v 1.32.2.6 2005/09/21 15:02:53 lange Exp $
116c116
< find(\&FCopyTree, "$top/$f") unless (-e "$f");
---
> find({wanted => \&FCopyTree, follow => 1}, "$top/$f") unless (-e
"$f");
124c124
< find(\&FCopyTree, "$top/$apptypename");
---
> find({wanted => \&FCopyTree, follow => 1}, "$top/$apptypename");
133c133
< find(\&FCopyTree, "$top/$apptypename/ioc");
---
> find({wanted => \&FCopyTree, follow => 1},
"$top/$apptypename/ioc");
149c149
< find(\&FCopyTree, "$top/$apptypename/");
---
> find({wanted => \&FCopyTree, follow => 1}, "$top/$apptypename/");
-------- Original Message --------
Subject: RE: R3.14.8 makeBaseApp.pl
Date: Wed, 23 Nov 2005 15:42:59 -0700
From: Jeff Hill <[email protected]>
To: 'Janet Anderson' <[email protected]>
CC: 'EPICS core-talk' <[email protected]>
> I just tried makeBaseApp.pl on win32 and it prompted me
> ok but it did not create any files or directories.
> Do you have the same problem?
I see that also. That's probably a recently introduced behavior.
Jeff
> -----Original Message-----
> From: Janet Anderson [mailto:[email protected]]
> Sent: Wednesday, November 23, 2005 12:20 PM
> To: Hill Jeff
> Subject: R3.14.8 makeBaseApp.pl
>
> Hi Jeff,
>
> I just tried makeBaseApp.pl on win32 and it prompted me
> ok but it did not create any files or directories.
> Do you have the same problem?
>
> Janet
