From 3fd0aa366ba82bc5bd760cbd78ddda597fa76f76 Mon Sep 17 00:00:00 2001 From: Frank Lichtenheld Date: Tue, 26 Feb 2008 15:22:36 +0100 Subject: [PATCH] Dpkg::Source::Package: Fix some errors in error messages --- scripts/Dpkg/Source/Package.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scripts/Dpkg/Source/Package.pm b/scripts/Dpkg/Source/Package.pm index d13cae85..7219e757 100644 --- a/scripts/Dpkg/Source/Package.pm +++ b/scripts/Dpkg/Source/Package.pm @@ -102,7 +102,7 @@ sub upgrade_object_type { $module .= "::$variant" if defined $variant; eval "require $module"; if ($@) { - error(_g("source package format `%s' is not supported (perl module %s is required)"), $format, $module); + error(_g("source package format `%s' is not supported (Perl module %s is required)"), $format, $module); } bless $self, $module; } else { @@ -226,7 +226,7 @@ sub extract { } sub do_extract { - error("Dpkg::Source::Package doesn't know how to unpack a source package. Use one of the subclass."); + error("Dpkg::Source::Package doesn't know how to unpack a source package. Use one of the subclasses."); } # Function used specifically during creation of a source package @@ -241,7 +241,7 @@ sub build { } sub do_build { - error("Dpkg::Source::Package doesn't know how to build a source package. Use one of the subclass."); + error("Dpkg::Source::Package doesn't know how to build a source package. Use one of the subclasses."); } sub can_build { -- 2.39.5