oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more comments, support for txt and pod upgrade files

Browse source
This commit is contained in:
Graham Knop 2010-05-18 20:34:52 -05:00
parent 29c01ffad7
commit 8326c63c1e
9 changed files with 201 additions and 142 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lib/WebGUI/Upgrade/File/pod.pm Normal file
View file

@ -0,0 +1,19 @@
package WebGUI::Upgrade::File::pod;
use Moose;
with 'WebGUI::Upgrade::File';
sub once { 1 }
sub run {
my $class = shift;
my ($upgrade, $configFile, $version, $file) = @_;
if ( ! $upgrade->quiet ) {
system { $^X } $^X, '-MPod::Perldoc', '-ePod::Perldoc->run', $file;
}
return 1;
}
__PACKAGE__->meta->make_immutable;
1;