Made iter argument to TREE-MODEL-ITER-N-CHILDREN optional

[clg] / examples / testcairo.lisp

diff --git a/examples/testcairo.lisp b/examples/testcairo.lisp
index 41b7230c71ef0c41d45639fddd35c87f5d745221..dc0f7bb8633f59d846610f79f335e2aaaf1759cd 100644 (file)
--- a/examples/testcairo.lisp
+++ b/examples/testcairo.lisp
@@ -7,10 +7,10 @@
 #+(or cmu clisp)(asdf:oos 'asdf:load-op :cairo)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
 #+(or cmu clisp)(asdf:oos 'asdf:load-op :cairo)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)

-  (unless (pkg-config:pkg-exists-p "librsvg-2.0" :atleast-version "2.13.93")
+  (unless (pkg-config:pkg-exists-p "librsvg-2.0" :atleast-version "2.14.0")

     (warn "SVG tests disabled as the required version of librsvg is not available.")))
 
     (warn "SVG tests disabled as the required version of librsvg is not available.")))
 

-#?(pkg-config:pkg-exists-p "librsvg-2.0" :atleast-version "2.13.93")
+#?(pkg-config:pkg-exists-p "librsvg-2.0" :atleast-version "2.14.0")

 #+sbcl(require :rsvg)
 #+(or cmu clisp)(asdf:oos 'asdf:load-op :rsvg)
 
 #+sbcl(require :rsvg)
 #+(or cmu clisp)(asdf:oos 'asdf:load-op :rsvg)