X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=helm%2Fhbugs%2Fcommon%2Fhbugs_id_generator.ml;fp=helm%2Fhbugs%2Fcommon%2Fhbugs_id_generator.ml;h=93d349b74d11d220ebd2e2ce8a1aa672c5e76f3a;hp=59f67347c9f989d5b951f89c71b39cca94eb13ac;hb=5d7d6bd5090f3f82279bef0b93b4b361a5b1d751;hpb=39d7157312213114f81948978510bed7d85a7610

diff --git a/helm/hbugs/common/hbugs_id_generator.ml b/helm/hbugs/common/hbugs_id_generator.ml
index 59f67347c..93d349b74 100644
--- a/helm/hbugs/common/hbugs_id_generator.ml
+++ b/helm/hbugs/common/hbugs_id_generator.ml
@@ -1,5 +1,7 @@
 (*
- *  Copyright (C) 2003, HELM Team.
+ * Copyright (C) 2003:
+ *    Stefano Zacchiroli <zack@cs.unibo.it>
+ *    for the HELM Team http://helm.cs.unibo.it/
  *
  *  This file is part of HELM, an Hypertextual, Electronic
  *  Library of Mathematics, developed at the Computer Science
@@ -21,9 +23,15 @@
  *  MA  02111-1307, USA.
  *
  *  For details, see the HELM World-Wide-Web page,
- *  http://cs.unibo.it/helm/.
+ *  http://helm.cs.unibo.it/
  *)
 
 let new_broker_id () =  (* TODO write a real id generator! *)
   "FOO BROKER ID!"
+let new_client_id () =  (* TODO write a real id generator! *)
+  "FOO CLIENT ID!"
+let new_musing_id () =  (* TODO write a real id generator! *)
+  "FOO MUSING ID!"
+let new_tutor_id () =  (* TODO write a real id generator! *)
+  "FOO TUTOR ID!"