X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FHelper%2FObject.pm;h=922dafb97dfa51f3dca072da7a58850e141c4979;hb=bfa674c9d4edc551afa6e27aac6f684a7b8cb656;hp=9c0b9862598cd176308bdc503dd011ef09e48a12;hpb=963330ccde9da7cb7bb390c1c52dbe2e051d67da;p=kivitendo-erp.git

diff --git a/SL/Helper/Object.pm b/SL/Helper/Object.pm
index 9c0b98625..922dafb97 100644
--- a/SL/Helper/Object.pm
+++ b/SL/Helper/Object.pm
@@ -76,11 +76,11 @@ sub delegate {
       die "invalid args handling '$params->{args}'" unless defined $target_code;
 
       eval "
-        sub $caller::$method {
+        sub ${caller}::$method {
           $pre_context $target_code$method_joiner$target_method$args_string; $post_context
         }
         1;
-      " or die "could not create $caller::$method: $@";
+      " or die "could not create ${caller}::$method: $@";
     }
   }
 }
@@ -109,9 +109,9 @@ SL::Helper::Object - Meta Object Helper Mixin
 
 =head1 DESCRIPTION
 
-Sick of writing getter, setter? No because Rose::Object::MakeMethods got you covered.
+Sick of writing getter, setter? No because Rose::Object::MakeMethods has you covered.
 
-Sick of writing all the rest that Rose an't do? Put it here. Functionality in this
+Sick of writing all the rest that Rose can't do? Put it here. Functionality in this
 mixin is passed as an include parameter, but are still described as functions:
 
 =head1 FUNCTIONS