Changeset 16117

Timestamp:

07/23/08 13:54:14 (5 years ago)

Author:

daisuke

Message:

fix data normalization

Files:

• lang/perl/Google-Chart/branches/moose/lib/Google/Chart/Data/Extended.pm (modified) (1 diff)

lang/perl/Google-Chart/branches/moose/lib/Google/Chart/Data/Extended.pm

@@ -35 +35 @@
         if (defined $data && looks_like_number($data)) {
             my $normalized = int(($data * $scale) / $max);
-
             if ($normalized < 0) {
                 $normalized = 0;
-            } elsif ($normalized >= $max) {
-                $normalized = $max - 1;
+            } elsif ($normalized >= $scale) {
+                $normalized = $scale - 1;
             }