--- loncom/imspackages/imsimport.pm	2006/11/27 16:37:36	1.21
+++ loncom/imspackages/imsimport.pm	2006/12/05 02:55:54	1.22
@@ -856,7 +856,7 @@ sub handler {
         $fn=$env{'form.filename'};
         $fn=~s/^http\:\/\/[^\/]+\///;
         $fn=~s/^\///;
-        $fn=~s/(\~|priv\/)(\w+)//;
+        $fn=~s/(\~|priv\/)($LONCAPA::username_re)//;
         $fn=~s/\/+/\//g;
     } else {
         $r->log_reason($env{'user.name'}.' at '.$env{'user.domain'}.