missing ; in eval'ed sub

diff --git a/FS/FS/part_export/infostreet.pm b/FS/FS/part_export/infostreet.pm
index 0f478d2..f2d5199 100644 (file)
--- a/FS/FS/part_export/infostreet.pm
+++ b/FS/FS/part_export/infostreet.pm
@@ -167,7 +167,7 @@ sub infostreet_command { #subroutine, not method
   die $@ if $@;
 
   eval 'sub Frontier::RPC2::String::repr {
-    my $self = shift
+    my $self = shift;
     my $value = $$self;
     $value =~ s/([&<>\"])/$Frontier::RPC2::char_entities{$1}/ge;
     $value;