Index: openacs-4/packages/recruiting/www/admin/edit-candidate.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/www/admin/edit-candidate.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/recruiting/www/admin/edit-candidate.tcl	1 Aug 2002 00:45:49 -0000	1.1
+++ openacs-4/packages/recruiting/www/admin/edit-candidate.tcl	2 Aug 2002 16:48:26 -0000	1.2
@@ -85,6 +85,20 @@
         -html {size 30} \
         -value $info(country)
 
+element create edit_candidate home_phone \
+        -label "Home phone:" \
+        -datatype text \
+        -widget text \
+        -html {size 14} \
+        -value [recruiting_candidate::format_phone -phone_number $info(home_phone)]
+
+element create edit_candidate cell_phone \
+        -label "Mobile phone:" \
+        -datatype text \
+        -widget text \
+        -html {size 14} \
+        -value [recruiting_candidate::format_phone -phone_number $info(cell_phone)]
+
 element create edit_candidate email \
         -label "Email:" \
         -datatype text \
@@ -107,6 +121,7 @@
     form get_values edit_candidate \
             first_name last_name \
             address1 address2 city state zip zip_plus_four country \
+            home_phone cell_phone \
             email status    
     
     recruiting_candidate::update_candidate \
@@ -120,6 +135,8 @@
             -zip $zip \
             -zip_plus_four $zip_plus_four \
             -country $country \
+            -home_phone [recruiting_candidate::strip_phone -phone_number $home_phone] \
+            -cell_phone [recruiting_candidate::strip_phone -phone_number $cell_phone] \
             -email $email \
             -status $status \
             -package_id $package_id