rpms/ocaml-camlimages/devel camlimages-3.0.1-display-module.patch, NONE, 1.1 camlimages-2.2.0-stubdest.patch, 1.1, NONE

[Richard W.M. Jones]

Author: rjones

Update of /cvs/pkgs/rpms/ocaml-camlimages/devel
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv13483

Added Files:
	camlimages-3.0.1-display-module.patch 
Removed Files:
	camlimages-2.2.0-stubdest.patch 
Log Message:
Add patch.

camlimages-3.0.1-display-module.patch:

--- NEW FILE camlimages-3.0.1-display-module.patch ---
diff -ur camlimages-3.0.1.orig/examples/liv/liv.ml camlimages-3.0.1/examples/liv/liv.ml
--- camlimages-3.0.1.orig/examples/liv/liv.ml	2006-09-29 14:21:41.000000000 +0100
+++ camlimages-3.0.1/examples/liv/liv.ml	2008-11-03 17:18:02.000000000 +0000
@@ -21,14 +21,14 @@
 
 open Livmisc;;
 open Gui;;
-open Display;;
+open Livdisplay;;
 open Tout;;
 
 open Gc;;
 
 exception Skipped;;
 
-let base_filters = ref ([] : Display.filter list);;
+let base_filters = ref ([] : Livdisplay.filter list);;
 
 let r = Gc.get () in
 r.max_overhead <- 0; Gc.set r;
@@ -52,15 +52,15 @@
   "-root",
     Arg.String
       (function
-       | "center" -> Display.root_mode := `CENTER
-       | "random" -> Display.root_mode := `RANDOM
+       | "center" -> Livdisplay.root_mode := `CENTER
+       | "random" -> Livdisplay.root_mode := `RANDOM
        | _ -> raise (Failure "root mode")),
     ": on root [center|random]";
   "-transition",
     Arg.String
       (function
-       | "myst" -> Display.transition := `MYST
-       | "transparent" -> Display.transition := `TRANSPARENT
+       | "myst" -> Livdisplay.transition := `MYST
+       | "transparent" -> Livdisplay.transition := `TRANSPARENT
        | _ -> raise (Failure "transition")),
     ": transition [myst|transparent]";
   "-transparentborder",
diff -ur camlimages-3.0.1.orig/examples/liv/Makefile.am camlimages-3.0.1/examples/liv/Makefile.am
--- camlimages-3.0.1.orig/examples/liv/Makefile.am	2007-05-21 19:54:32.000000000 +0100
+++ camlimages-3.0.1/examples/liv/Makefile.am	2008-11-03 17:15:54.000000000 +0000
@@ -23,7 +23,7 @@
 	       seq.ml \
 	       tout.ml \
 	       enhance.ml \
-	       display.ml \
+	       livdisplay.ml \
 	       viewer.ml \
 	       edge.ml \
 	       pathfind.ml \


--- camlimages-2.2.0-stubdest.patch DELETED ---