--- loncom/homework/inputtags.pm	2001/07/12 19:27:48	1.37
+++ loncom/homework/inputtags.pm	2001/07/13 14:02:35	1.38
@@ -31,6 +31,7 @@ sub initialize_inputtags {
 sub start_input {
   my ($parstack,$safeeval)=@_;
   my $id = &Apache::lonxml::get_param('id',$parstack,$safeeval);
+  if ($id eq '') { $id = $Apache::lonxml::curdepth; }
   push (@Apache::inputtags::input,$id);
   push (@Apache::inputtags::inputlist,$id);
   return $id;