From: Arthur Axel "fREW" Schmidt Date: Wed, 27 Jan 2010 07:06:09 +0000 (+0000) Subject: replace silly, clever code X-Git-Tag: v0.900201~46 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=851aad7c6363d8ef85e55bc4949d92cbca1170dc;p=dbsrgits%2FDBIx-Class-Journal.git replace silly, clever code --- diff --git a/lib/DBIx/Class/Schema/Journal.pm b/lib/DBIx/Class/Schema/Journal.pm index deb16f7..48c1056 100644 --- a/lib/DBIx/Class/Schema/Journal.pm +++ b/lib/DBIx/Class/Schema/Journal.pm @@ -116,7 +116,7 @@ sub create_journal_for my $source = $self->source($s_name); foreach my $audit (qw(AuditLog AuditHistory)) { - my $audit_source = join("", $s_name, $audit); + my $audit_source = $s_name.$audit; my $class = blessed($journal_schema) . "::$audit_source"; Class::C3::Componentised->inject_base($class, "DBIx::Class::Schema::Journal::DB::$audit");