theory at bricolage
Mar 6, 2009, 5:31 PM
Post #1 of 1
(400 views)
Permalink
|
Revision: 8465
Author: theory
Date: 2009-03-06 17:31:18 -0800 (Fri, 06 Mar 2009)
ViewCVS: http://viewsvn.bricolage.cc/?rev=8465&view=rev
Log Message:
-----------
Formatting.
Modified Paths:
--------------
bricolage/trunk/lib/Bric/Biz/Asset.pm
bricolage/trunk/lib/Bric/Util/Burner.pm
Modified: bricolage/trunk/lib/Bric/Biz/Asset.pm
===================================================================
--- bricolage/trunk/lib/Bric/Biz/Asset.pm 2009-03-07 01:22:30 UTC (rev 8464)
+++ bricolage/trunk/lib/Bric/Biz/Asset.pm 2009-03-07 01:31:18 UTC (rev 8465)
@@ -1659,7 +1659,9 @@
if (EXPIRE_ON_DEACTIVATE) {
my $tz = Bric::Util::Pref->lookup_val('Time Zone');
- $self->set_expire_date( my $now = DateTime->now(time_zone => $tz)->strftime(ISO_8601_FORMAT));
+ $self->set_expire_date(
+ my $now = DateTime->now(time_zone => $tz)->strftime(ISO_8601_FORMAT)
+ );
$self->save;
my $key = $self->key_name;
Modified: bricolage/trunk/lib/Bric/Util/Burner.pm
===================================================================
--- bricolage/trunk/lib/Bric/Util/Burner.pm 2009-03-07 01:22:30 UTC (rev 8464)
+++ bricolage/trunk/lib/Bric/Util/Burner.pm 2009-03-07 01:31:18 UTC (rev 8465)
@@ -1274,23 +1274,24 @@
$self->_set(['base_path'], [$base_path]);
# Get a list of server types this category applies to.
- my $bat = $oc_sts->{$ocid} ||=
- Bric::Dist::ServerType->list({ can_publish => 1,
- active => 1,
- output_channel_id => $ocid });
+ my $bat = $oc_sts->{$ocid} ||= Bric::Dist::ServerType->list({
+ can_publish => 1,
+ active => 1,
+ output_channel_id => $ocid,
+ });
# Make sure we have some destinations.
unless (@$bat) {
my $errstr = q{Cannot publish asset "} . $ba->get_name
. q{" to "} . $oc->get_name . q{" because there }
. "are no Destinations associated with this output channel.";
- throw_burn_error error => $errstr,
- mode => $self->get_mode,
- oc => $oc->get_name,
- elem => $at->get_name,
+ throw_burn_error error => $errstr,
+ mode => $self->get_mode,
+ oc => $oc->get_name,
+ elem => $at->get_name,
element => $at
- if $die_err;
- add_msg($errstr);
+ if $die_err;
+ add_msg($errstr);
next;
}
|
