diff --git a/Finance/Quote/Morningstarde.pm b/Finance/Quote/Morningstarde.pm index 9ab9a94..a6c388e 100644 --- a/Finance/Quote/Morningstarde.pm +++ b/Finance/Quote/Morningstarde.pm @@ -42,11 +42,10 @@ my %wknmap = ( 'lu0454071019' => 'a0ya5q' ); -sub methods {return ('morningstarde' => \&morningstarde, - 'europe' => \&morningstarde);} +sub methods {return ('morningstarde' => \&morningstarde);} { -my @labels = ('name', 'date', 'price', 'last', 'currency'); -sub labels { return (morningstarde => \@labels, europe => \@labels); } +my @labels = ('name', 'date', 'nav', 'currency'); +sub labels { return (morningstarde => \@labels); } } @@ -100,8 +99,7 @@ sub morningstarde my $converted_price = $splitvals[1]; $converted_price =~ s/\.//g; $converted_price =~ s/,/./g; - $info{$stock,'price'} = $converted_price; - $info{$stock,'last'} = $converted_price; + $info{$stock,'nav'} = $converted_price; } };