From: Stefano Zacchiroli Date: Mon, 2 Dec 2002 15:26:05 +0000 (+0000) Subject: - written help message X-Git-Tag: V_0_0_6~19 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=9bd5d6f57b26908d53c1fad8a349602dc3434956;p=helm.git - written help message --- diff --git a/helm/uwobo/src/ocaml/uwobo.ml b/helm/uwobo/src/ocaml/uwobo.ml index af7f47cc4..4a4d28470 100644 --- a/helm/uwobo/src/ocaml/uwobo.ml +++ b/helm/uwobo/src/ocaml/uwobo.ml @@ -24,9 +24,6 @@ * http://cs.unibo.it/helm/. *) -(* TODO quando si prova ad applicare uno stylesheet che non e' stato caricato -viene lasciata passare una eccezione Not_found *) - open Printf;; open Uwobo_common;; @@ -67,7 +64,62 @@ in let syslogger = new Uwobo_logger.sysLogger ~level:debug_level () in syslogger#enable; let styles = new Uwobo_styles.styles in -let usage_string = "Help message: not yet written!!" in (* TODO *) +let usage_string = + sprintf +" + + + UWOBO's help message + + +

+ Usage: http://hostname:uwoboport/command +

+

+ Available commands: +

+

+ help
+ display this help message +

+

+ add?bind=key,uri[&bind=key,stylesheet[&...]]
+ load a new stylesheet, specified by uri, and bind it to key + key +

+

+ remove?[?keys=key1,key2,...]
+ unload stylesheets specified by key1, key2, ... or all + stylesheets if no key was given +

+

+ reload?[?keys=key1,key2,...]
+ reload stylesheets specified by key1, key2, ... or all + stylesheets if no key was given +

+

+ list
+ return a list of loaded stylesheets +

+

+ apply?xmluri=uri&keys=key1,key2,...[¶m.name=value[¶m.name=value[&...]]][¶m.key.name=value[¶m.key.name=value[&...]]][&name[=value][&prop.name[=value][&...]]]
+ apply a chain of stylesheets, specified by key1, key2, ..., to an + input document, specified by uri.
+ Additional parameters can be set for each stylesheet application: global + parameters (i.e. parameters passed to all stylesheets) are set using + param.name=value syntax, per stylesheet parameters are set using + param.key.name=value where key is the key of a loaded + stylesheet.
+ Properties of the final chain output can be set too: valueless properties + can be set using prop.name syntax, others can be set using + prop.name=value syntax.
+ Current supported properties are: %s. +

+ + +" + (String.concat ", " Uwobo_common.supported_properties) +in (* thread action *) let callback req outchan =