Index: openacs-4/packages/ecommerce/www/gift-certificate.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/ecommerce/www/gift-certificate.tcl 20 Apr 2001 20:51:13 -0000 1.1 +++ openacs-4/packages/ecommerce/www/gift-certificate.tcl 26 May 2002 04:36:50 -0000 1.2 @@ -1,22 +1,20 @@ -# www/ecommerce/gift-certificate.tcl ad_page_contract { @param gift_certificate_id @param usca_p - @author - @creation-date - @cvs-id gift-certificate.tcl,v 3.2.2.5 2000/08/18 21:46:33 stevenp Exp - @author ported by Jerry Asher (jerry@theashergroup.com) + @author + @creation-date + @author ported by Jerry Asher (jerry@theashergroup.com) + @author revised by Bart Teeuwisse + @revision-date April 2002 + } { gift_certificate_id:integer usca_p:optional } - - - - # we need them to be logged in + set user_id [ad_verify_and_get_user_id] if {$user_id == 0} { @@ -75,5 +73,5 @@ } } db_release_unused_handles -ec_return_template +ad_return_template