Index: openacs-4/contrib/packages/simulation/tcl/simulation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/tcl/Attic/simulation-procs.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/contrib/packages/simulation/tcl/simulation-procs.tcl	13 Nov 2003 13:44:36 -0000	1.11
+++ openacs-4/contrib/packages/simulation/tcl/simulation-procs.tcl	14 Nov 2003 11:40:35 -0000	1.12
@@ -15,6 +15,11 @@
 ad_proc -public simulation::include_contract { args } {
     Used to define which parameters an include expecs.
 
+    <p>
+      NOTE: This proc is to be replaced with a refactored ad_page_contract that
+      can function for includes. Lars knows more.
+    </p>
+
     @param args A list where the first element is an explanation of what the
                 include does, who wrote it when etc. The second element is the optional
                 param spec which is an array list where the keys are parameter (variable)
@@ -63,10 +68,6 @@
       </ul>
     </p> 
 
-    <p>
-      TODO: Have Lars review this proc and then move it into core
-    </p>
-    
     @author Peter Marklund
 } {
     set description [lindex $args 0]