r54735 - in /trunk/libgstreamer-interfaces-perl: ./ debian/ lib/ t/ xs/

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Wed Mar 24 16:38:23 UTC 2010


Author: gregoa
Date: Wed Mar 24 16:38:08 2010
New Revision: 54735

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=54735
Log:
New upstream release.

Added:
    trunk/libgstreamer-interfaces-perl/lib/
      - copied from r54734, branches/upstream/libgstreamer-interfaces-perl/current/lib/
    trunk/libgstreamer-interfaces-perl/perl-GStreamer-Interfaces.doap
      - copied unchanged from r54734, branches/upstream/libgstreamer-interfaces-perl/current/perl-GStreamer-Interfaces.doap
Removed:
    trunk/libgstreamer-interfaces-perl/Interfaces.pm
    trunk/libgstreamer-interfaces-perl/MAINTAINERS
    trunk/libgstreamer-interfaces-perl/copyright.pod
Modified:
    trunk/libgstreamer-interfaces-perl/MANIFEST
    trunk/libgstreamer-interfaces-perl/META.yml
    trunk/libgstreamer-interfaces-perl/Makefile.PL
    trunk/libgstreamer-interfaces-perl/NEWS
    trunk/libgstreamer-interfaces-perl/debian/changelog
    trunk/libgstreamer-interfaces-perl/gstinterfacesperl.h
    trunk/libgstreamer-interfaces-perl/t/GstPropertyProbe.t
    trunk/libgstreamer-interfaces-perl/t/GstXOverlay.t
    trunk/libgstreamer-interfaces-perl/xs/GstInterfaces.xs
    trunk/libgstreamer-interfaces-perl/xs/GstXOverlay.xs

Modified: trunk/libgstreamer-interfaces-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/MANIFEST?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/MANIFEST (original)
+++ trunk/libgstreamer-interfaces-perl/MANIFEST Wed Mar 24 16:38:08 2010
@@ -1,15 +1,14 @@
 ChangeLog.pre-git
-copyright.pod
 examples/gst-video-player.pl
 gstinterfacesperl.h
-Interfaces.pm
+lib/GStreamer/Interfaces.pm
 LICENSE
-MAINTAINERS
 Makefile.PL
 MANIFEST			This list of files
 MANIFEST.SKIP
 maps
 NEWS
+perl-GStreamer-Interfaces.doap
 README
 t/GstPropertyProbe.t
 t/GstXOverlay.t

Modified: trunk/libgstreamer-interfaces-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/META.yml?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/META.yml (original)
+++ trunk/libgstreamer-interfaces-perl/META.yml Wed Mar 24 16:38:08 2010
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               GStreamer-Interfaces
-version:            0.05
+version:            0.06
 abstract:           Perl interface to the GStreamer Interfaces library
 author:  []
 license:            unknown

Modified: trunk/libgstreamer-interfaces-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/Makefile.PL?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/Makefile.PL (original)
+++ trunk/libgstreamer-interfaces-perl/Makefile.PL Wed Mar 24 16:38:08 2010
@@ -57,15 +57,22 @@
 Glib::CodeGen->parse_maps('gstinterfacesperl');
 Glib::CodeGen->write_boot(ignore => qr/^GStreamer::Interfaces$/);
 
+ExtUtils::PkgConfig->write_version_macros (
+  "build/gstinterfacesperl-version.h",
+  "gstreamer-plugins-base-0.10" => "GST_INTERFACES",
+);
+
 my $gst = ExtUtils::Depends->new('GStreamer::Interfaces', 'GStreamer');
 $gst->set_inc($pkgcfg{cflags});
 $gst->set_libs($pkgcfg{libs} . ' -lgstinterfaces-0.10');
 $gst->add_xs(<xs/*.xs>);
-$gst->add_pm('Interfaces.pm' => '$(INST_LIBDIR)/Interfaces.pm');
+$gst->add_pm('lib/GStreamer/Interfaces.pm' => '$(INST_LIBDIR)/Interfaces.pm');
 $gst->add_typemaps(map {File::Spec->catfile(cwd(), $_)}
                        ('build/gstinterfacesperl.typemap'));
 
-$gst->install(qw(gstinterfacesperl.h));
+$gst->install(qw(gstinterfacesperl.h
+                 build/gstinterfacesperl-autogen.h
+                 build/gstinterfacesperl-version.h));
 $gst->save_config('build/IFiles.pm');
 
 my $configure_requires =
@@ -73,8 +80,8 @@
 
 WriteMakefile(
   NAME          => 'GStreamer::Interfaces',
-  VERSION_FROM  => 'Interfaces.pm',
-  ABSTRACT_FROM => 'Interfaces.pm',
+  VERSION_FROM  => 'lib/GStreamer/Interfaces.pm',
+  ABSTRACT_FROM => 'lib/GStreamer/Interfaces.pm',
   PREREQ_PM     => \%pre_reqs,
   XSPROTOARG    => '-noprototypes',
 
@@ -86,8 +93,5 @@
 );
 
 sub MY::postamble {
-  return Glib::MakeHelper->postamble_clean ()
-       . Glib::MakeHelper->postamble_docs_full (
-           DEPENDS => $gst,
-           COPYRIGHT_FROM => 'copyright.pod');
+  return Glib::MakeHelper->postamble_clean ();
 }

Modified: trunk/libgstreamer-interfaces-perl/NEWS
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/NEWS?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/NEWS (original)
+++ trunk/libgstreamer-interfaces-perl/NEWS Wed Mar 24 16:38:08 2010
@@ -1,3 +1,11 @@
+Overview of changes in GStreamer::Interfaces 0.06
+=================================================
+
+* Add GStreamer::XOverlay->handle_events.  It is only available for
+  gstinterfaces >= 0.10.12, so also add GStreamer::Interfaces->CHECK_VERSION to
+  make version checks possible.
+* Fix test failures.
+
 Overview of changes in GStreamer::Interfaces 0.05
 =================================================
 

Modified: trunk/libgstreamer-interfaces-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/debian/changelog?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/debian/changelog (original)
+++ trunk/libgstreamer-interfaces-perl/debian/changelog Wed Mar 24 16:38:08 2010
@@ -1,3 +1,9 @@
+libgstreamer-interfaces-perl (0.06-1) UNRELEASED; urgency=low
+
+  * New upstream release.
+
+ -- gregor herrmann <gregoa at debian.org>  Wed, 24 Mar 2010 17:36:46 +0100
+
 libgstreamer-interfaces-perl (0.05-1) unstable; urgency=low
 
   [ Nathan Handler ]

Modified: trunk/libgstreamer-interfaces-perl/gstinterfacesperl.h
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/gstinterfacesperl.h?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/gstinterfacesperl.h (original)
+++ trunk/libgstreamer-interfaces-perl/gstinterfacesperl.h Wed Mar 24 16:38:08 2010
@@ -26,6 +26,7 @@
 #include <gst/interfaces/propertyprobe.h>
 #include <gst/interfaces/xoverlay.h>
 
+#include "gstinterfacesperl-version.h"
 #include "gstinterfacesperl-autogen.h"
 
 #endif /* _GSTINTERFACES2PERL_H_ */

Modified: trunk/libgstreamer-interfaces-perl/t/GstPropertyProbe.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/t/GstPropertyProbe.t?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/t/GstPropertyProbe.t (original)
+++ trunk/libgstreamer-interfaces-perl/t/GstPropertyProbe.t Wed Mar 24 16:38:08 2010
@@ -11,20 +11,19 @@
 my $property = "device";
 
 my $element = GStreamer::ElementFactory -> make($plugin => "element");
-isa_ok($element, "GStreamer::PropertyProbe");
+SKIP: {
+  skip 'could not find the alsamixer plugin', 5
+    unless defined $element;
+  isa_ok($element, "GStreamer::PropertyProbe");
 
-my @pspecs = $element -> get_probe_properties();
-SKIP: {
-  skip 'got no probe properties', 8
+  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));

Modified: trunk/libgstreamer-interfaces-perl/t/GstXOverlay.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/t/GstXOverlay.t?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/t/GstXOverlay.t (original)
+++ trunk/libgstreamer-interfaces-perl/t/GstXOverlay.t Wed Mar 24 16:38:08 2010
@@ -22,5 +22,9 @@
   $element -> expose();
   $element -> got_xwindow_id(0);
   $element -> prepare_xwindow_id();
+
+  skip 'need 0.10.12', 0
+    unless GStreamer::Interfaces->CHECK_VERSION(0, 10, 12);
+  $element -> handle_events(TRUE);
 }
 

Modified: trunk/libgstreamer-interfaces-perl/xs/GstInterfaces.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/xs/GstInterfaces.xs?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/xs/GstInterfaces.xs (original)
+++ trunk/libgstreamer-interfaces-perl/xs/GstInterfaces.xs Wed Mar 24 16:38:08 2010
@@ -25,3 +25,15 @@
 BOOT:
 #include "register.xsh"
 #include "boot.xsh"
+
+=for apidoc __hide__
+=cut
+bool
+CHECK_VERSION (class, major, minor, micro)
+	int major
+	int minor
+	int micro
+    CODE:
+	RETVAL = GST_INTERFACES_CHECK_VERSION (major, minor, micro);
+    OUTPUT:
+	RETVAL

Modified: trunk/libgstreamer-interfaces-perl/xs/GstXOverlay.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgstreamer-interfaces-perl/xs/GstXOverlay.xs?rev=54735&op=diff
==============================================================================
--- trunk/libgstreamer-interfaces-perl/xs/GstXOverlay.xs (original)
+++ trunk/libgstreamer-interfaces-perl/xs/GstXOverlay.xs Wed Mar 24 16:38:08 2010
@@ -29,3 +29,9 @@
 void gst_x_overlay_got_xwindow_id (GstXOverlay *overlay, gulong xwindow_id);
 
 void gst_x_overlay_prepare_xwindow_id (GstXOverlay *overlay);
+
+#if GST_INTERFACES_CHECK_VERSION(0, 10, 12)
+
+void gst_x_overlay_handle_events (GstXOverlay * overlay, gboolean handle_events);
+
+#endif




More information about the Pkg-perl-cvs-commits mailing list