Index: openacs-4/contrib/packages/general-comments/lib/comments.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/general-comments/lib/Attic/comments.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/contrib/packages/general-comments/lib/comments.adp 22 May 2003 13:49:59 -0000 1.1 @@ -0,0 +1,8 @@ + + +

@comments.title@

+@comments.content@ +
+
  • $comments.title [_ general-comments.by] $author [_ general-comments.on] $comments.pretty_date
    + + \ No newline at end of file Index: openacs-4/contrib/packages/general-comments/lib/comments.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/general-comments/lib/Attic/comments.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/contrib/packages/general-comments/lib/comments.tcl 22 May 2003 13:49:59 -0000 1.1 @@ -0,0 +1,18 @@ +# packages/general-comments/lib/comments.tcl +# this includable template returns HTML formatted comments +# pass in a reference to a multirow datasource that contains the comment data +# +# @param object_id +# @param adp - optional path to adp to use for formatting +# @comments - referecnce to multirow containing the comments +# +# Dave Bauer +# cvs-id: +# + + +if {[info exists adp]} { + ad_return_template $adp +} else { + ad_return template +}