Commits

camlspotter committed b4e0095

removed redundant opens

Comments (0)

Files changed (8)

examples/liv/display.ml

 (* $Id: display.ml,v 1.36.2.1 2010/05/13 13:36:09 furuse Exp $ *)
 
 open Livmisc;;
-open Color;;
 open Gui;;
 open Tout;;
 
 open Gdk;;
-open GDraw;;
-open GMain;;
 
 type filter = [ `SIZE of int * int * [ `ATMOST | `ATLEAST | `NOASPECT ] ];;
 

examples/liv/icon.ml

 
 open Images;;
 open OImages;;
-open Livshtype;;
 open Geometry;;
-open Ximage;;
 open OXimage;;
 
 let xvmode = ref false;;

examples/liv/jWidget.ml

-open Gdk
 open GMain
 
 class status_bar ?packing ?show () =

examples/liv/liv.ml

 module D = Display
 open D
 
-open Gc
+(* open Gc *)
 open Unix
 open LargeFile
-open Gdk
-open GDraw
 open GMain
 
 open Livmisc

examples/liv/livsh.ml

 
 (* $Id: livsh.ml,v 1.10 2008/02/19 12:44:04 furuse Exp $ *)
 
-open OImages;;
-open GBin;;
 open GPack;;
-open Ximage;;
 open Gui;;
 open Livshtype;;
 open Livmisc;;

examples/liv/livshtype.ml

 open Mstring;;
 open Unix;;
 open Images;;
-open Info;;
+(* open Info;; *)
 
 type typ =
    | ContentType of string

examples/liv/tout.ml

 (* $Id: tout.ml,v 1.14 2004/09/21 18:15:46 weis Exp $ *)
 
 open Livmisc;;
-open Gdk;;
-open GDraw;;
+(* open Gdk;; *)
+(* open GDraw;; *)
 open GMain;;
 
 let wait = ref 0.0;;

examples/liv/viewer.ml

 
 open Gdk;;
 open Gtk;;
-open GObj;;
-open Gui;;
 
 (* image viewer widget *)