--- loncom/homework/response.pm	2002/11/27 19:25:56	1.68
+++ loncom/homework/response.pm	2003/02/13 23:48:27	1.69
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # various response type definitons response definition
 #
-# $Id: response.pm,v 1.68 2002/11/27 19:25:56 albertel Exp $
+# $Id: response.pm,v 1.69 2003/02/13 23:48:27 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -68,7 +68,10 @@ sub start_hintresponse {
 
 sub end_hintresponse {
   pop @Apache::inputtags::response;
-  %Apache::inputtags::params=@{pop(@Apache::inputtags::paramstack)};
+  if (defined($Apache::inputtags::paramstack[-1])) {
+      %Apache::inputtags::params=
+	  @{ pop(@Apache::inputtags::paramstack) };
+  }
   return '';
 }