--- loncom/interface/loncommon.pm 2004/11/02 20:48:02 1.226 +++ loncom/interface/loncommon.pm 2004/11/08 22:50:37 1.227 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.226 2004/11/02 20:48:02 albertel Exp $ +# $Id: loncommon.pm,v 1.227 2004/11/08 22:50:37 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -662,6 +662,7 @@ sub help_open_menu { my $link=''; my $title = &mt('Get help'); my $origurl = $ENV{'REQUEST_URI'}; + $origurl=~s|^/~|/priv/|; my $timestamp = time; foreach (\$color,\$function,\$topic,\$component_help,\$faq,\$bug,\$origurl) { $$_ = &Apache::lonnet::escape($$_);