Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!fernwood!synopsys!synopsys.synopsys.com!stevej
From: stevej@synopsys.synopsys.com (Steven Jukoff)
Newsgroups: comp.lang.perl
Subject: Perl Patches Applied
Keywords: patch
Message-ID: <540@synopsys.COM>
Date: 28 Jun 90 21:46:05 GMT
Sender: stevej@synopsys.com
Organization: Synopsys Inc., Mountain View, Ca
Lines: 62

I received and attempted to apply all 18 patches at once.
In the directory containing Perl source I tried:

foreach i (patch*)
	patch < $i
end


I get: 

[Stuff deleted...]
Hmm...  The next patch looks like a new-style context diff to me...
The text leading up to this was:
--------------------------
|
|Index: t/op.sort
|Prereq: 3.0
|*** t/op.sort.old      Thu Oct 26 23:31:20 1989
|--- t/op.sort  Thu Oct 26 23:31:21 1989
--------------------------
File to patch:

...and waits for input. 
What other answer is there besides the name after "Index:" ?
In all cases I put the name given after "Index:"

How do I know what patchlevel I am at?
% cat patchlevel.h
#define PATCHLEVEL 1

Shouldn't this be 18 after the above procedure?


If I subsequently try 'patch -f' I expect something like
"patch applied".  But it runs all the patches again.
Eventually I get an error:

|Index: t/op.dbm
|Prereq: 3.0
|*** t/op.dbm.old       Tue Mar 27 16:43:24 1990
|--- t/op.dbm   Tue Mar 27 16:43:25 1990
--------------------------
No file to patch.  Skipping...
Can't find  t/op.dbm.             (...and it terminates)

% ls t/op.dbm
t/op.dbm

'ls' finds it.  Why do I get this error?

% cat patchlevel.h 
#define PATCHLEVEL 18

Do I really have all 18 patches applied even though I got
"Can't find  t/op.dbm" error?

If you have experience with this please help.

Steven Jukoff,             Phone: (415)962-5407
Synopsys, Inc.             FAX:   (415)965-8637
1098 Alta Ave              DDN:   stevej@synopsys.com
Mountain View, CA 94043    UUCP:  ..!uunet!fernwood!synopsys!stevej