Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs1:/tmp/cvs-serv15788
Modified Files:
ChangeLog Engine.pm PkgVersion.pm
Log Message:
Allow an essential package to have a splitoff which is not essential.
(However, the parent of an essential package must be essential.) Uses a new
virtual field _ParentEssential.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.288
retrieving revision 1.289
diff -u -d -r1.288 -r1.289
--- ChangeLog 4 Jun 2003 20:12:25 -0000 1.288
+++ ChangeLog 7 Jun 2003 15:01:51 -0000 1.289
@@ -1,3 +1,10 @@
+2003-06-07 Dave Morrison <[EMAIL PROTECTED]>
+
+ * Engine.pm, PkgVersion.pm: Allow an essential package to have a
+ splitoff which is not essential. (However, the parent of an
+ essential package must be essential.) Uses a new virtual field
+ _ParentEssential.
+
2003-06-04 Chris Zubrzycki <[EMAIL PROTECTED]>
* Engine.pm: Add fink list limit by maintainer or tree.
Index: Engine.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Engine.pm,v
retrieving revision 1.98
retrieving revision 1.99
diff -u -d -r1.98 -r1.99
--- Engine.pm 4 Jun 2003 20:12:25 -0000 1.98
+++ Engine.pm 7 Jun 2003 15:01:52 -0000 1.99
@@ -952,8 +952,8 @@
# -> only include life-time dependencies
@deplist = $item->[2]->resolve_depends(0);
}
- # add essential packages
- if (not $item->[2]->param_boolean("Essential")) {
+ # add essential packages (being careful about packages whose parent is
essential)
+ if (not $item->[2]->param_boolean("Essential") and not
$item->[2]->param_boolean("_ParentEssential")) {
push @deplist, @elist;
}
DEPLOOP: foreach $dep (@deplist) {
Index: PkgVersion.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/PkgVersion.pm,v
retrieving revision 1.122
retrieving revision 1.123
diff -u -d -r1.122 -r1.123
--- PkgVersion.pm 16 May 2003 01:10:40 -0000 1.122
+++ PkgVersion.pm 7 Jun 2003 15:01:52 -0000 1.123
@@ -187,7 +187,10 @@
if ($parent->has_param('homepage')) {
$self->{'homepage'} = $parent->{'homepage'};
}
-
+ if ($parent->has_param('essential')) {
+ $self->{'_parentessential'} = $parent->{'essential'};
+ }
+
# handle inherited fields
our @inherited_fields =
qw(Description DescDetail License);
-------------------------------------------------------
This SF.net email is sponsored by: Etnus, makers of TotalView, The best
thread debugger on the planet. Designed with thread debugging features
you've never dreamed of, try TotalView 6 free at www.etnus.com.
_______________________________________________
Fink-commits mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/fink-commits
