OpenPKG CVS Repository
http://www.openpkg.org/cvsweb/cvsweb.cgi
____________________________________________________________________________
Server: cvs.openpkg.org Name: Thomas Lotterer
Root: /e/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-re Date: 14-Aug-2002 12:00:48
Branch: HEAD Handle: 2002081411004700
Modified files:
openpkg-re src2make.pl
Log:
support package-version targets (expect requires tcl-x.y)
Summary:
Revision Changes Path
1.39 +36 -0 openpkg-re/src2make.pl
____________________________________________________________________________
Index: openpkg-re/src2make.pl
============================================================
$ cvs diff -u -r1.38 -r1.39 src2make.pl
--- openpkg-re/src2make.pl 9 Aug 2002 19:30:27 -0000 1.38
+++ openpkg-re/src2make.pl 14 Aug 2002 10:00:47 -0000 1.39
@@ -481,6 +481,15 @@
}
$MF .= "\n";
+$MF .= "# build individual-version latest packages\n";
+foreach my $name (sort(keys(%{$PMV}))) {
+ my $V = $PMV->{$name};
+ $V =~ s/-[2-9][0-9]{7}$//;
+ $MF .= sprintf("%-30s %s\n", "build-$name-$V:", "build-$name-".$PMV->{$name});
+ push(@MFTL, "build-$name-$V");
+}
+$MF .= "\n";
+
$MF .= "# install all latest packages\n" .
"install-latest: \\\n";
push(@MFTL, "install-latest");
@@ -497,6 +506,15 @@
}
$MF .= "\n";
+$MF .= "# install individual-version latest packages\n";
+foreach my $name (sort(keys(%{$PMV}))) {
+ my $V = $PMV->{$name};
+ $V =~ s/-[2-9][0-9]{7}$//;
+ $MF .= sprintf("%-30s %s\n", "install-$name-$V:",
"install-$name-".$PMV->{$name});
+ push(@MFTL, "install-$name-$V");
+}
+$MF .= "\n";
+
$MF .= "# uninstall all latest packages\n" .
"uninstall-latest: \\\n";
push(@MFTL, "uninstall-latest");
@@ -513,6 +531,15 @@
}
$MF .= "\n";
+$MF .= "# uninstall individual-version latest packages\n";
+foreach my $name (sort(keys(%{$PMV}))) {
+ my $V = $PMV->{$name};
+ $V =~ s/-[2-9][0-9]{7}$//;
+ $MF .= sprintf("%-30s %s\n", "uninstall-$name-$V:",
"uninstall-$name-".$PMV->{$name});
+ push(@MFTL, "uninstall-$name-$V");
+}
+$MF .= "\n";
+
$MF .= "# list all latest packages\n" .
"list-latest: \\\n";
push(@MFTL, "list-latest");
@@ -528,6 +555,15 @@
push(@MFTL, "list-$name");
}
$MF .= "\n";
+
+$MF .= "# list individual-version latest packages\n";
+foreach my $name (sort(keys(%{$PMV}))) {
+ my $V = $PMV->{$name};
+ $V =~ s/-[2-9][0-9]{7}$//;
+ $MF .= sprintf("%-30s %s\n", "list-$name-$V:", "list-$name-".$PMV->{$name});
+ push(@MFTL, "list-$name-$V");
+}
+#$MF .= "\n";
# "<name> [<op> <vers>]"
# (<name>, <vers>)
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [EMAIL PROTECTED]
