--- loncom/homework/imagechoice.pm	2008/10/13 14:06:47	1.15
+++ loncom/homework/imagechoice.pm	2009/02/18 07:06:12	1.16
@@ -1,4 +1,4 @@
-# $Id: imagechoice.pm,v 1.15 2008/10/13 14:06:47 bisitz Exp $
+# $Id: imagechoice.pm,v 1.16 2009/02/18 07:06:12 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -32,7 +32,7 @@ use LONCAPA;
 
 sub deletedata {
     my ($id)=@_;
-    &Apache::lonnet::delenv("imagechoice\\.$id\\.coords");
+    &Apache::lonnet::delenv('imagechoice.'.$id.'.coords');
 }
 
 sub closewindow {