[SCM] Debian package checker branch, master, updated. 2.1.0-21-gd15f010
The following commit has been merged in the master branch:
commit a4b56b1a92127bf068695635b13360c7fbf89ca7
Author: Adam D. Barratt <adam@adam-barratt.org.uk>
Date: Sun Dec 7 15:30:59 2008 +0000
Export a number of functions so they can be called from other modules
diff --git a/lib/Read_taginfo.pm b/lib/Read_taginfo.pm
index cade0ec..0aaa6c7 100644
--- a/lib/Read_taginfo.pm
+++ b/lib/Read_taginfo.pm
@@ -19,6 +19,12 @@
# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
# MA 02110-1301, USA.
+package Read_taginfo;
+
+use Exporter;
+our @ISA = qw(Exporter);
+our @EXPORT = qw(read_tag_info format_tag_description);
+
my $LINTIAN_ROOT = $ENV{'LINTIAN_ROOT'} || '/usr/share/lintian';
my $debug = $ENV{'LINTIAN_DEBUG'} || 0;
@@ -47,7 +53,7 @@ sub read_tag_info {
for my $f (<$LINTIAN_ROOT/checks/*.desc>) {
print "N: Reading checker description file $f ...\n" if $debug >= 2;
- my @secs = read_dpkg_control($f);
+ my @secs = Util::read_dpkg_control($f);
$secs[0]->{'check-script'} or fail("error in description file $f: `Check-Script:' not defined");
for (my $i=1; $i<=$#secs; $i++) {
diff --git a/lib/Text_utils.pm b/lib/Text_utils.pm
index 56ea7b4..e869b50 100644
--- a/lib/Text_utils.pm
+++ b/lib/Text_utils.pm
@@ -19,6 +19,12 @@
# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
# MA 02110-1301, USA.
+package Text_utils;
+
+use Exporter;
+our @ISA = qw(Exporter);
+our @EXPORT = qw(split_paragraphs wrap_paragraphs dtml_to_html dtml_to_text);
+
use strict;
# requires wrap() function
--
Debian package checker
Reply to: