[gimp-perl] Don't assume first colour palette will have 256 colours. Fixes bug #723140.

[Kevin Cozens <kcozens src gnome org>]

commit 86990efff8f5d1bfdb9ace1630a33925841bc5f1
Author: Kevin Cozens <kevin ve3syb ca>
Date:   Tue Jan 28 18:56:08 2014 -0500

    Don't assume first colour palette will have 256 colours.  Fixes bug #723140.

 t/run.t |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/t/run.t b/t/run.t
index f8d4bb4..82489ce 100644
--- a/t/run.t
+++ b/t/run.t
@@ -49,10 +49,10 @@ ok(!$l->sharpen(10), 'call with maximum fu magic');
 ok(!Gimp->plug_in_sharpen($i,$l,10), 'call plugin using default');
 
 # exercise COLORARRAY
-my @palettes = Gimp->palettes_get_list("");
+my @palettes = Gimp->palettes_get_list("Default");
 my @colors = Gimp::Palette->get_colors($palettes[0]);
 #require Data::Dumper;warn Data::Dumper::Dumper(scalar @colors), "\n";
-cmp_ok(scalar(@colors), '==', 256, 'colorarray correct size');
+cmp_ok(scalar(@colors), '==', 23, 'colorarray correct size');
 cmp_ok(scalar(@{ $colors[0] }), '==', 4, 'colorarray 1st el is correct size');
 
 # exercise VECTORS