Update of /cvsroot/fink/fink/mirror
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv11812
Modified Files:
ChangeLog postinstall.pl.in
Log Message:
Repair CVS/Root parsing, and sharpen the search/replace.
Index: postinstall.pl.in
===================================================================
RCS file: /cvsroot/fink/fink/mirror/postinstall.pl.in,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- postinstall.pl.in 15 May 2006 19:23:40 -0000 1.14
+++ postinstall.pl.in 23 May 2006 22:57:04 -0000 1.15
@@ -53,7 +53,7 @@
open(IN,'<',"$sentinel_cvs/Root") or die "can't open $sentinel_cvs/Root:
$!";
while (defined($_=<IN>)) {
chomp;
- if (/^(:\w+:\w+@)(.+)$/) {
+ if (/^(:\w+:\w+)@(.+)$/) {
$method_user = $1;
$repo = $2;
}
@@ -81,7 +81,7 @@
my $replace_cvs_root = sub {
if ($File::Find::name =~ /\/CVS\/Root$/ && -e $File::Find::name) {
# we should *really* do this ourselves instead of spawning
processes
- system
('/usr/bin/perl','-pi','-e',"s|$repo|$stored_repo|",$File::Find::name);
+ system ('/usr/bin/perl','-pi','-e',"s|[EMAIL PROTECTED]|[EMAIL
PROTECTED]|",$File::Find::name);
}
};
Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/mirror/ChangeLog,v
retrieving revision 1.102
retrieving revision 1.103
diff -u -d -r1.102 -r1.103
--- ChangeLog 15 May 2006 19:23:40 -0000 1.102
+++ ChangeLog 23 May 2006 22:57:04 -0000 1.103
@@ -1,3 +1,8 @@
+2006-05-23 Dave Morrison <[EMAIL PROTECTED]>
+
+ * postinstall.pl.in: Repair CVS/Root parsing, and sharpen the
+ search/replace.
+
2006-05-15 Daniel Macks <[EMAIL PROTECTED]>
* postinstall.pl.in: Fix my bad chomp, add lots of other tests for
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits
