Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs17:/tmp/cvs-serv1933
Modified Files:
ChangeLog PkgVersion.pm
Log Message:
Remove get_desc* methods again, since the pdb dump script now directly
calls param_default_expanded
Index: PkgVersion.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/PkgVersion.pm,v
retrieving revision 1.600
retrieving revision 1.601
diff -u -d -r1.600 -r1.601
--- PkgVersion.pm 3 Sep 2007 20:20:15 -0000 1.600
+++ PkgVersion.pm 4 Sep 2007 17:57:29 -0000 1.601
@@ -838,6 +838,8 @@
=cut
+### Do not change API! param_default_expanded is used by the pdb scripts (dump)
+
sub param_default_expanded {
my $self = shift;
my $field = shift;
@@ -2017,80 +2019,6 @@
return $desc;
}
-=item get_descdetail
-
- my $desc = $self->get_descdetail;
- my $desc = $self->get_descdetail %options;
-
-Returns the description of the package with percent fields expanded but
-otherwise unformatted. The following %options are known:
-
-=over 4
-
-=item canonical_prefix (optional)
-
-If the value is true, use "/sw" for %p when parsing the fields content
-instead of the local fink's normal installation path.
-
-=back
-
-=cut
-
-### Do not change API! This is used by the pdb (dump)
-
-sub get_descdetail {
- my $self = shift;
- my %options = @_;
-
- my $expand_override;
- if ($options{'canonical_prefix'}) {
- $expand_override->{'p'} = '/sw';
- }
-
- return $self->param_default_expanded('DescDetail', '',
- expand_override => $expand_override,
- err_action => 'ignore'
- );
-}
-
-
-=item get_descusage
-
- my $desc = $self->get_descusage;
- my $desc = $self->get_descusage %options;
-
-Returns the usage description of the package with percent fields expanded but
-otherwise unformatted. The following %options are known:
-
-=over 4
-
-=item canonical_prefix (optional)
-
-If the value is true, use "/sw" for %p when parsing the fields content
-instead of the local fink's normal installation path.
-
-=back
-
-=cut
-
-### Do not change API! This is used by the pdb (dump)
-
-sub get_descusage {
- my $self = shift;
- my %options = @_;
-
- my $expand_override;
- if ($options{'canonical_prefix'}) {
- $expand_override->{'p'} = '/sw';
- }
-
- return $self->param_default_expanded('DescUsage', '',
- expand_override => $expand_override,
- err_action => 'ignore'
- );
-}
-
-
### get installation state
sub is_fetched {
Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1491
retrieving revision 1.1492
diff -u -d -r1.1491 -r1.1492
--- ChangeLog 3 Sep 2007 20:20:15 -0000 1.1491
+++ ChangeLog 4 Sep 2007 17:57:28 -0000 1.1492
@@ -1,3 +1,8 @@
+2006-09-04 Christian Schaffner <[EMAIL PROTECTED]>
+
+ * PkgVersion.pm: Remove get_desc* methods again, since the pdb dump
script
+ now directly calls param_default_expanded
+
2007-09-03 Daniel Macks <[EMAIL PROTECTED]>
* PkgVersion.pm: Consistent naming of accessors for their field-names
-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems? Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
Fink-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/fink-commits
