(pre-)porting to gtkmathview 0.6.3 && ocaml 3.08

[helm.git] / helm / DEVEL / lablgtkmathview / gMathView.mli

diff --git a/helm/DEVEL/lablgtkmathview/gMathView.mli b/helm/DEVEL/lablgtkmathview/gMathView.mli
index 62b31d35d8088aa8f484f1da819302f6410f33e3..9ec204d51ac07ac5fcd6f804d1ccdeb0b6ce3995 100644 (file)
--- a/helm/DEVEL/lablgtkmathview/gMathView.mli
+++ b/helm/DEVEL/lablgtkmathview/gMathView.mli
@@ -26,9 +26,9 @@ exception ErrorWritingFile of string
 exception ErrorLoadingDOM
 
 class math_view_signals :
-  ([> `container | `gtk | `mathview | `widget] as 'b) Gtk.obj ->
+  ([> `gtk | `mathview_gmetadom | `widget] as 'b) Gtk.obj ->
   object ('a)
-    inherit GContainer.container_signals
+    inherit GObj.widget_signals
     val after: bool
     val obj: 'b Gtk.obj
     method click :
@@ -48,18 +48,15 @@ class math_view_signals :
 class math_view_skel :
   (Gtk_mathview.math_view Gtk.obj as 'a)->
   object
-    inherit GContainer.container
+    inherit GObj.widget
     method freeze : unit
     method thaw : unit
     method get_buffer : Gdk.pixmap
     method get_font_size : int
-    method get_drawing_area : GMisc.drawing_area
-    method get_hadjustment : GData.adjustment
-    method get_height : int
+    method get_adjustments : GData.adjustment * GData.adjustment
+    method get_size : int * int
     method get_log_verbosity : int
     method get_top : int * int
-    method get_vadjustment : GData.adjustment
-    method get_width : int
     method load_uri : filename:string -> unit
     method load_root : root:Gdome.element -> unit
     method set_adjustments : GData.adjustment -> GData.adjustment -> unit
@@ -89,7 +86,6 @@ val math_view :
   ?vadjustment:GData.adjustment ->
   ?font_size:int ->
   ?log_verbosity:int ->
-  ?border_width:int ->
   ?width:int ->
   ?height:int ->
   ?packing:(GObj.widget -> unit) -> ?show:bool -> unit -> math_view