Index: openacs.org-dev/packages/static-pages/tcl/static-pages-sc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/static-pages/tcl/static-pages-sc-procs.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/static-pages/tcl/static-pages-sc-procs.tcl	9 Jul 2002 17:35:13 -0000	1.1.1.1
+++ openacs.org-dev/packages/static-pages/tcl/static-pages-sc-procs.tcl	8 Oct 2002 15:47:41 -0000	1.1.1.2
@@ -1,29 +1,35 @@
-# static-pages/tcl/static-pages-sc-procs.tcl
-# implements OpenFTS Search service contracts
-# Dave Bauer dave@thedesignexperience.org
-# 2001-10-27
+ad_library { 
+    static-pages/tcl/static-pages-sc-procs.tcl
+    implements OpenFTS Search service contracts
 
-# Right now I am leaving the keywords blank
-# in the future we should either extract them from the META keyword tag
-# or allow assignment of cr_keywords to static_pages
+    @author Dave Bauer (dave@thedesignexperience.org)
+    @creation-date 2001-10-27
+    @cvs-id $Id$
+}
 
 ad_proc static_page__datasource {
     object_id
 } {
-    @author Dave Bauer
-} {
+    Right now I am leaving the keywords blank
+    in the future we should either extract them from the META keyword tag
+    or allow assignment of cr_keywords to static_pages
+    
+    @author Dave Bauer (dave@thedesignexperience.org)
 
+    @param object_id the object_id for which to generate the data
+
+} {
     set path_stub [cr_fs_path STATIC_PAGES]
     
-    db_0or1row sp_datasource ""     -column_array datasource
+    db_0or1row sp_datasource "" -column_array datasource
 
     return [array get datasource]
 }
 
 ad_proc static_page__url {
     object_id
 } {
-    @author Dave Bauer
+    @author Dave Bauer (dave@thedesignexperience.org)
 } {
 
     db_1row sp_url ""