[cairo-commit] cairo-perl CairoSurface.xs, 1.16, 1.17 ChangeLog, 1.38, 1.39

Torsten Schoenfeld commit at pdx.freedesktop.org
Sun Sep 24 05:20:47 PDT 2006


Committed by: tsch

Update of /cvs/cairo/cairo-perl
In directory kemper:/tmp/cvs-serv20207

Modified Files:
	CairoSurface.xs ChangeLog 
Log Message:
	* t/CairoSurface.t: Don't check the specific type of similar
	surfaces created from PS and PDF surfaces; it's not reliable.

	* xs/CairoSurface.xs: Cosmetical changes.


Index: CairoSurface.xs
===================================================================
RCS file: /cvs/cairo/cairo-perl/CairoSurface.xs,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- CairoSurface.xs	13 Aug 2006 18:53:26 -0000	1.16
+++ CairoSurface.xs	24 Sep 2006 12:20:43 -0000	1.17
@@ -55,7 +55,7 @@
 	return NULL;
 }
 
-#endif
+#endif /* !1.2.0 */
 
 static const char *
 get_package (cairo_surface_t *surface)
@@ -169,7 +169,7 @@
                        unsigned int length)
 {
 	CairoPerlCallback *callback;
-	cairo_status_t status;
+	cairo_status_t status = CAIRO_STATUS_SUCCESS;
 	dCAIRO_PERL_CALLBACK_MARSHAL_SP;
 
 	callback = (CairoPerlCallback *) closure;
@@ -188,7 +188,9 @@
 	call_sv (callback->func, G_DISCARD | G_EVAL);
 	SPAGAIN;
 
-	status = SvTRUE (ERRSV) ? SvCairoStatus (ERRSV) : CAIRO_STATUS_SUCCESS;
+	if (SvTRUE (ERRSV)) {
+		status = SvCairoStatus (ERRSV);
+	}
 
 	PUTBACK;
 	FREETMPS;

Index: ChangeLog
===================================================================
RCS file: /cvs/cairo/cairo-perl/ChangeLog,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -d -r1.38 -r1.39
--- ChangeLog	4 Sep 2006 15:38:05 -0000	1.38
+++ ChangeLog	24 Sep 2006 12:20:43 -0000	1.39
@@ -1,3 +1,10 @@
+2006-09-24	tsch
+
+	* t/CairoSurface.t: Don't check the specific type of similar
+	surfaces created from PS and PDF surfaces; it's not reliable.
+
+	* xs/CairoSurface.xs: Cosmetical changes.
+
 2006-09-04	tsch
 
 	* Cairo.pm, NEWS, README: Stable release 1.00.



More information about the cairo-commit mailing list