X-Git-Url: http://git.annexia.org/?p=rpmdepsize.git;a=blobdiff_plain;f=rpmdepsize.ml;h=f48c0ef9e0c05c9db2e365d8eaeef4259139e786;hp=d0489bbcfa02ee76cb23aeac0d4debaadd645443;hb=b2b717fc777536665f1fd77a3f3d06f235347881;hpb=9cbf0eda6e509d89ea09ae4c9902ff93b0a21261

diff --git a/rpmdepsize.ml b/rpmdepsize.ml
index d0489bb..f48c0ef 100644
--- a/rpmdepsize.ml
+++ b/rpmdepsize.ml
@@ -19,8 +19,14 @@
  * Python script modified from a version by Seth Vidal.
  *)
 
+(* Rename the extlib Std module so it doesn't clash with the
+ * sexplib Std module.
+ *)
+module Extlib_Std = Std
+
 open Sexplib
-TYPE_CONV_PATH "."
+open Sexplib.Conv
+(*TYPE_CONV_PATH "."*)
 
 open ExtList
 open Unix
@@ -130,7 +136,7 @@ sys.stdout.write (\"))\")  # suppress trailing newline" in
   let chan = open_process_in cmd in
   ignore (input_line chan); (* Drop "Loaded plugins" line. *)
   let root, pkgs =
-    root_packages_of_sexp (Sexp.of_string (Std.input_all chan)) in
+    root_packages_of_sexp (Sexp.of_string (Extlib_Std.input_all chan)) in
   (match close_process_in chan with
    | WEXITED 0 -> ()
    | WEXITED i -> failwithf "python command exited with status %d" i