--- loncom/interface/groupsort.pm 2006/07/28 20:01:26 1.47
+++ loncom/interface/groupsort.pm 2006/07/31 18:39:15 1.48
@@ -2,7 +2,7 @@
# The LON-CAPA group sort handler
# Allows for sorting prior to import into RAT.
#
-# $Id: groupsort.pm,v 1.47 2006/07/28 20:01:26 www Exp $
+# $Id: groupsort.pm,v 1.48 2006/07/31 18:39:15 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -431,7 +431,7 @@ sub hidden {
my ($sel,$title,$filelink) = @_;
my $string = '';
- $filelink=~s/^\/ext\//http\:\/\//;
+ $filelink=~s|^/ext/|http://|;
$string .= '';
return $string;