From acba025a9a6fe28250a1006814e25a45460a9941 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Tue, 12 Apr 2016 16:36:11 +0200 Subject: [PATCH] perl5.10 compat: ellipsis (yada-ayada) ist da syntax error --- SL/Controller/TopQuickSearch/Base.pm | 14 +++++++------- SL/Controller/TopQuickSearch/CustomerVendor.pm | 6 +++--- SL/Controller/TopQuickSearch/OERecord.pm | 6 +++--- 3 files changed, 13 insertions(+), 13 deletions(-) diff --git a/SL/Controller/TopQuickSearch/Base.pm b/SL/Controller/TopQuickSearch/Base.pm index 6c6061848..1c9e5d349 100644 --- a/SL/Controller/TopQuickSearch/Base.pm +++ b/SL/Controller/TopQuickSearch/Base.pm @@ -3,19 +3,19 @@ package SL::Controller::TopQuickSearch::Base; use strict; use parent qw(Rose::Object); -sub auth { ... } +sub auth { die 'must be overwritten' } -sub name { ... } +sub name { die 'must be overwritten' } -sub description_config { ... } +sub description_config { die 'must be overwritten' } -sub description_field { ... } +sub description_field { die 'must be overwritten' } -sub query_autocomplete { ... } +sub query_autocomplete { die 'must be overwritten' } -sub select_autocomplete { ... } +sub select_autocomplete { die 'must be overwritten' } -sub do_search { ... } +sub do_search { die 'must be overwritten' } 1; diff --git a/SL/Controller/TopQuickSearch/CustomerVendor.pm b/SL/Controller/TopQuickSearch/CustomerVendor.pm index 16ab8632f..bb6aa4e38 100644 --- a/SL/Controller/TopQuickSearch/CustomerVendor.pm +++ b/SL/Controller/TopQuickSearch/CustomerVendor.pm @@ -14,11 +14,11 @@ use Rose::Object::MakeMethods::Generic ( # nope. this is only for subclassing sub auth { 'NOT ALLOWED' } -sub name { ... } +sub name { die 'must be overwritten' } -sub description_config { ... } +sub description_config { die 'must be overwritten' } -sub description_field { ... } +sub description_field { die 'must be overwritten' } sub query_autocomplete { my ($self) = @_; diff --git a/SL/Controller/TopQuickSearch/OERecord.pm b/SL/Controller/TopQuickSearch/OERecord.pm index adac74adf..f166edbd7 100644 --- a/SL/Controller/TopQuickSearch/OERecord.pm +++ b/SL/Controller/TopQuickSearch/OERecord.pm @@ -15,11 +15,11 @@ use Rose::Object::MakeMethods::Generic ( # nope. this is only for subclassing sub auth { 'NOT ALLOWED' } -sub name { ... } +sub name { die 'must be overwritten' } -sub description_config { ... } +sub description_config { die 'must be overwritten' } -sub description_field { ... } +sub description_field { die 'must be overwritten' } sub query_autocomplete { my ($self) = @_; -- 2.20.1