EPICS Controls Argonne National Laboratory

Experimental Physics and
Industrial Control System

2002  2003  2004  <20052006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024  Index 2002  2003  2004  <20052006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024 
<== Date ==> <== Thread ==>

Subject: Re: [Fwd: RE: R3.14.8 makeBaseApp.pl]
From: Ralph Lange <[email protected]>
To: Janet Anderson <[email protected]>
Cc: [email protected]
Date: Mon, 28 Nov 2005 16:38:21 +0100
Hm.

the follow => 1 is needed, else makeBaseApp won't follow symbolic links.
(That's perl 5.8.4 on Linux).

Find used to work for symbolic links without the extra argument, but for this perl it is needed. (I don't have all perl versions here, so I can't tell when Find was changed to not follow symlinks by default.)

What does the perl doc on your cygwin system say on find() ?

Ralph


Janet Anderson wrote:

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


--
Ralph Lange               [email protected]     Tel: +49 30 6392-2117
BESSY Controls Group      www.bessy.de             Fax:      ...   -4859


Replies:
Re: [Fwd: RE: R3.14.8 makeBaseApp.pl] Ralph Lange
References:
[Fwd: RE: R3.14.8 makeBaseApp.pl] Janet Anderson

Navigate by Date:
Prev: [Fwd: RE: R3.14.8 makeBaseApp.pl] Janet Anderson
Next: Re: [Fwd: RE: R3.14.8 makeBaseApp.pl] Ralph Lange
Index: 2002  2003  2004  <20052006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024 
Navigate by Thread:
Prev: [Fwd: RE: R3.14.8 makeBaseApp.pl] Janet Anderson
Next: Re: [Fwd: RE: R3.14.8 makeBaseApp.pl] Ralph Lange
Index: 2002  2003  2004  <20052006  2007  2008  2009  2010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024 
ANJ, 02 Feb 2012 Valid HTML 4.01! · Home · News · About · Base · Modules · Extensions · Distributions · Download ·
· Search · EPICS V4 · IRMIS · Talk · Bugs · Documents · Links · Licensing ·