[perl-GStreamer-Interfaces] Fix test failures in GstPropertyProbe.t

[Torsten Schönfeld <tsch src gnome org>]

commit 14072cabceb4d097d3dab98c3510f91c2edc99aa
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date:   Sat Mar 20 12:54:52 2010 +0100

    Fix test failures in GstPropertyProbe.t
    
    Don't assume that the alsamixer element is present.  Correct a skip
    count.

 t/GstPropertyProbe.t |   15 +++++++--------
 1 files changed, 7 insertions(+), 8 deletions(-)
---
diff --git a/t/GstPropertyProbe.t b/t/GstPropertyProbe.t
index a9f4f12..4d2b73c 100644
--- a/t/GstPropertyProbe.t
+++ b/t/GstPropertyProbe.t
@@ -11,20 +11,19 @@ my $plugin = "alsamixer";
 my $property = "device";
 
 my $element = GStreamer::ElementFactory -> make($plugin => "element");
-isa_ok($element, "GStreamer::PropertyProbe");
-
-my @pspecs = $element -> get_probe_properties();
 SKIP: {
-  skip 'got no probe properties', 8
+  skip 'could not find the alsamixer plugin', 5
+    unless defined $element;
+  isa_ok($element, "GStreamer::PropertyProbe");
+
+  my @pspecs = $element -> get_probe_properties();
+  skip 'got no probe properties', 4
     unless @pspecs;
   isa_ok($pspecs[0], "Glib::ParamSpec");
-}
 
-my $pspec = $element -> get_probe_property($property);
-SKIP: {
+  my $pspec = $element -> get_probe_property($property);
   skip 'did not get desired property', 3
     unless defined $pspec;
-
   isa_ok($pspec, "Glib::ParamSpec");
 
   ok(defined $element -> needs_probe($pspec));