Changeset 10585 for lang/perl/WebService-Simple-Google-Chart/trunk/lib

Timestamp:

04/27/08 19:04:53 (7 months ago)

Author:

yusukebe

Message:

fixing typo

Files:

• lang/perl/WebService-Simple-Google-Chart/trunk/lib/WebService/Simple/Google/Chart.pm (modified) (2 diffs)

lang/perl/WebService-Simple-Google-Chart/trunk/lib/WebService/Simple/Google/Chart.pm

@@ -46 +46 @@
     my @values;
     map { push( @values, $data->{$_} ) } keys %$data;
-    @values = sort { $b <=> int $a } @values;
+    @values = sort { $b <=> $a } @values;
     return $values[0];
 }
 
 1;
+
+__END__
 
 =head1 NAME
@@ -92 +94 @@
 =cut
 
-1;
+