Index: openacs-4/packages/scholarship-fund/www/fund-add-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/scholarship-fund/www/fund-add-edit.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/scholarship-fund/www/fund-add-edit.tcl	19 Jun 2005 06:05:09 -0000	1.2
+++ openacs-4/packages/scholarship-fund/www/fund-add-edit.tcl	3 Aug 2005 22:58:58 -0000	1.3
@@ -37,12 +37,13 @@
 ad_form -name fund-add-edit \
     -form {
         item_id:key
-        title:text
-        description:text(textarea)
-        account_code:text
+        {title:text {label Title}}
+        {description:text(textarea) {label Description}}
+        {account_code:text {label "Account Code"}}
+	{amount:float {label "Amount in Fund"}}
     } -edit_request {
         # get existing fund info
-	db_1row get_fund "select sf.title, sf.description, sf.account_code from scholarship_fundi sf, cr_items ci where sf.revision_id=ci.live_revision and sf.item_id=:item_id"
+	db_1row get_fund "select sf.title, sf.description, sf.account_code, sf.amount from scholarship_fundi sf, cr_items ci where sf.revision_id=ci.live_revision and sf.item_id=:item_id"
     } -new_data {
         #add fund
         content::item::new \
@@ -53,15 +54,17 @@
             -description $description \
             -content_type scholarship_fund \
             -is_live t \
-            -attributes [list [list account_code $account_code]]
+            -attributes [list [list account_code $account_code] \
+			     [list amount $amount]]
             
     } -edit_data {
         #update fund
         content::revision::new \
             -item_id $item_id \
             -title $title \
             -description $description \
-            -attributes [list [list account_code $account_code]] \
+            -attributes [list [list account_code $account_code] \
+			     [list amount $amount]] \
             -is_live t
         
     } -after_submit {