X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fuwobo%2Fuwobo_styles.mli;h=2817e14a5a48323f7f0decc58213c1dd4f10bb6a;hb=cc40c18845dcd9b0bc3264b82940091b26ca53ff;hp=9d03b0924ba5ed64579e4de3e6b6cfa8398916ef;hpb=40d69bb0d68b6da47c625cca9c276fa19d6cc3aa;p=helm.git

diff --git a/helm/uwobo/uwobo_styles.mli b/helm/uwobo/uwobo_styles.mli
index 9d03b0924..2817e14a5 100644
--- a/helm/uwobo/uwobo_styles.mli
+++ b/helm/uwobo/uwobo_styles.mli
@@ -26,15 +26,11 @@
  *  http://helm.cs.unibo.it/
  *)
 
+open Uwobo_common ;;
+
 exception Stylesheet_not_found of string ;;
 exception Stylesheet_already_in of string ;;
 
-  (** libxslt's message *)
-type xslt_msg =
-  | LibXsltErrorMsg of string  (** libxslt's error messages *)
-  | LibXsltDebugMsg of string  (** libxslt's debugging messages *)
-type log = xslt_msg list ;;
-
   (** hold UWOBO styles at runtime *)
 class styles:
   object
@@ -46,22 +42,25 @@ class styles:
       @param key key to which the stylesheets will be bound
       @param uri uri of the stylesheet to be loaded
       @raise Stylesheet_already_in if key is already bound *)
-    method add: string -> string -> log
+    method add: string -> string -> unit
 
       (** remove the stylesheet bound to a given key *)
-    method remove: string -> log
+    method remove: string -> unit
 
       (** remove all loaded stylesheet *)
-    method removeAll: log
+    method removeAll: unit
 
       (** reload the stylesheet bound to a given key *)
-    method reload: string -> log
+    method reload: string -> unit
 
       (** reload all stylesheets *)
-    method reloadAll: log
+    method reloadAll: unit
 
     (** {2 Stylesheets usage} *)
 
+      (** @return the list of currently loaded stylesheets' keys *)
+    method keys: string list
+
       (** @return a list of strings, each string is a textual representation of
       information related to a loaded stylesheet. This representation includes
       at least stylesheet's key and URI *)