From 457ad636fb2b6c668fd2ea88991f5f02afb20f3d Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Wed, 14 Sep 2011 12:40:26 +0200 Subject: [PATCH] =?utf8?q?Csv=20Import=20Helper:=20classenlose=20profile?= =?utf8?q?=20d=C3=BCrfen=20den=20Dispatcher=20nicht=20abschiessen.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/Helper/Csv/Dispatcher.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SL/Helper/Csv/Dispatcher.pm b/SL/Helper/Csv/Dispatcher.pm index 6375daf03..be3faddd6 100644 --- a/SL/Helper/Csv/Dispatcher.pm +++ b/SL/Helper/Csv/Dispatcher.pm @@ -93,6 +93,8 @@ sub make_spec { my $spec = { key => $col, steps => [] }; my $cur_class = $self->_csv->class; + return unless $cur_class; + for my $step_index ( split /\.(?!\d)/, $path ) { my ($step, $index) = split /\./, $step_index; if ($cur_class->can($step)) { -- 2.20.1