bugfix

git-svn-id: http://caml.inria.fr/svn/ocaml/branches/mltk@4467 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
bmeurer · Feb 26, 2002 · 895f9aa · 895f9aa
1 parent f87f3be
commit 895f9aa
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/otherlibs/labltk/builtin/rawimg.ml b/otherlibs/labltk/builtin/rawimg.ml
@@ -30,8 +30,8 @@ let create w h =
 let get photo =
   match photo with
   | PhotoImage s -> {
-      pixmap_width = Imagephoto.width photo;
-      pixmap_height = Imagephoto.height photo;
+      pixmap_width = CImagephoto.width photo;
+      pixmap_height = CImagephoto.height photo;
       pixmap_data = rawget s;
     }