Index: prepopulate.module
===================================================================
RCS file: /cvs/drupal-contrib/contributions/modules/prepopulate/prepopulate.module,v
retrieving revision 1.5
diff -u -F^f -r1.5 prepopulate.module
--- prepopulate.module	30 Aug 2006 23:12:18 -0000	1.5
+++ prepopulate.module	31 Aug 2006 20:06:54 -0000
@@ -42,9 +42,9 @@ function prepopulate_form_alter($form_id
 } // endfunction prepopulate_form_alter()
 
 function _prepopulate_get_walk(&$form, &$getslice) {
-  if (!is_array($getslice)) {
+  if (!is_array($getslice) || _prepopulate_is_numeric_array($getslice)) {
     $form['#default_value'] = $getslice;
-  } 
+  }
   else {
     foreach (array_keys($getslice) as $getvar) {
       if (element_child($getvar) && is_array($form) && !is_null($form[$getvar])) {
@@ -54,4 +54,13 @@ function _prepopulate_get_walk(&$form, &
   } // endif getslice is not an array
 } // endfunction _prepopulate_get_walk()
 
+function _prepopulate_is_numeric_array($x) {
+  return (count($x,0)>=2) && array_reduce($x, "_prepopulate_is_numeric", TRUE);
+}
+
+function _prepopulate_is_numeric($v, $w) {
+  $v = $v && is_numeric($w);
+  return $v;
+}
+
 // vim: tw=300 nowrap syn=php