NAME

OpenInteract2::Manage::Website::UpdatePackageFromWebsite - Managment task

SYNOPSIS

#!/usr/bin/perl

use strict;
use OpenInteract2::Manage;

my $website_dir = '/home/httpd/mysite';
my $package_dir = '/home/superman/work/mypackage';
my $package     = 'mypackage';
my $changes     = 'More changes to templates';
my $task = OpenInteract2::Manage->new(
    'update_package', { website_dir => $website_dir,
                        package_dir => $package_dir,
                        package     => $package,
                        changelog   => $changes } );
my @status = $task->execute;
foreach my $s ( @status ) {
    my $ok_label      = ( $s->{is_ok} eq 'yes' )
                          ? 'OK' : 'NOT OK';
    my $default_label = ( $s->{is_default} eq 'yes' )
                          ? ' (default) ' : '';
    print "Status OK?  $s->{is_ok}\n",
          "$s->{message}\n",
          "($s->{updated} updated) ($s->{removed} removed) ",
          "($s->{skipped} skipped)\n";
}

REQUIRED OPTIONS

In addition to website_dir required by all OpenInteract2::Manage::Website tasks, we also require:

package=package name

Name of package you wish to synchronize

package_dir=/path/to/package

Directory of developement copy of package. Files here will be modified if they do not match files in the website copy.

version=new version (optional)

I will write this version into your development package 'Changes' file. If unspecified I will increment the most recent website package version by 0.01 and use that.

changelog=changelog message (optional, strongly recommended)

I will write this message into your development package 'Changes' file, associated with the new version written.

STATUS INFORMATION

In addition to the standard entries Each status hashref includes:

updated

Message with files updated

removed

Message with files removed

skipped

Message with files skipped

COPYRIGHT

Copyright (C) 2004-2005 Chris Winters. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHORS

Chris Winters, <chris@cwinters.com>