read gimp gradients with more than 9 segments

diff --git a/lib/Imager/Fountain.pm b/lib/Imager/Fountain.pm
index 23d8619560d436174890934510b0af4017055144..c8e99a5e8eee53bdeca39e6ea7d00d325a0b81f2 100644 (file)
--- a/lib/Imager/Fountain.pm
+++ b/lib/Imager/Fountain.pm
@@ -321,8 +321,9 @@ sub _load_gimp_gradient {
   if ($count =~ /^name:\s?(.*)/i) {
     ref $name and $$name = $1;
     $count = <$fh>; # try again
+    chomp $count;
   }
-  unless ($count =~ /^\d$/) {
+  unless ($count =~ /^\d+$/) {
     $Imager::ERRSTR = "$filename is missing the segment count";
     return;
   }