#!/usr/bin/perl -w # $Id$ # # Load all the modules included with SqueezeCenter use strict; use lib qw(lib); use File::Find::Rule; use File::Spec::Functions qw(:ALL); use Test::More; use Test::Pod; BEGIN { use_ok('Slim::Test::Base'); use_ok('Slim::bootstrap'); } my $topDir = Slim::Test::Base->serverDir; my @dirs = ( catdir($topDir, 'Slim'), catdir($topDir, 'Plugins'), ); all_pod_files_ok( all_pod_files( @dirs ) ); my @files = File::Find::Rule->file->name('*.pm')->in(@dirs); for my $module (@files) { $module =~ s!$topDir[/\\]!!; $module =~ s!/!::!g; $module =~ s!\.pm!!g; }