This gets rid of the need to hardcode the perl module path in the scripts. The Dselect methods are not really Debian specific anyway.
@@ -4,5 +4,5 @@ etc/dpkg/dselect.cfg.d
usr/bin/dselect
usr/lib/dpkg/methods
usr/share/locale/*/LC_MESSAGES/dselect.mo
-usr/share/perl5/Debian
+usr/share/perl5/Dselect
var/lib/dpkg/methods
@@ -10,7 +10,7 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-package Debian::Dselect::Ftp;
+package Dselect::Ftp;
use Net::FTP;
use Exporter;
@@ -33,7 +33,7 @@ nobase_dist_methods_SCRIPTS = \
multicd/install
perllibdir = $(PERL_LIBDIR)
-nobase_dist_perllib_DATA = Debian/Dselect/Ftp.pm
+nobase_dist_perllib_DATA = Dselect/Ftp.pm
EXTRA_DIST = multicd/README.multicd
@@ -22,9 +22,6 @@ use warnings;
use vars qw(%config $ftp);
#use diagnostics;
-use lib '/usr/lib/perl5/Debian';
-use lib '/usr/share/perl5/Debian';
-
eval q{
use File::Path;
use vars qw(%config);
eval 'use Net::FTP;';
if ($@) {
print STDERR "Please install the 'perl' package if you want to use the\n" .
@@ -21,9 +21,6 @@ use warnings;