Index: openacs-4/packages/recruiting/www/admin/new-candidate.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/www/admin/new-candidate.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/recruiting/www/admin/new-candidate.tcl	31 Jul 2002 23:54:00 -0000	1.2
+++ openacs-4/packages/recruiting/www/admin/new-candidate.tcl	2 Aug 2002 16:48:26 -0000	1.3
@@ -74,6 +74,18 @@
         -widget text \
         -html {size 30}
 
+element create new_candidate home_phone \
+        -label "Home phone:" \
+        -datatype text \
+        -widget text \
+        -html {size 14}
+
+element create new_candidate cell_phone \
+        -label "Mobile phone:" \
+        -datatype text \
+        -widget text \
+        -html {size 14}
+
 element create new_candidate email \
         -label "Email:" \
         -datatype text \
@@ -90,6 +102,7 @@
     form get_values new_candidate \
             first_name last_name \
             address1 address2 city state zip zip_plus_four country \
+            home_phone cell_phone \
             email status    
     
     recruiting_candidate::new \
@@ -102,6 +115,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