--- loncom/interface/spreadsheet/studentcalc.pm 2004/11/02 20:48:02 1.26
+++ loncom/interface/spreadsheet/studentcalc.pm 2004/12/08 00:56:00 1.27
@@ -1,5 +1,5 @@
#
-# $Id: studentcalc.pm,v 1.26 2004/11/02 20:48:02 albertel Exp $
+# $Id: studentcalc.pm,v 1.27 2004/12/08 00:56:00 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -143,18 +143,9 @@ sub parent_link {
sub convenience_links {
my $self = shift;
my ($resource) = @_;
- my $symb = &Apache::lonnet::escape($resource->{'symb'});
- my $result = <<"END";
-
-
-
-
-
-
-
-
-
-END
+ my $result=&Apache::loncommon::submlink('',$self->{'name'},$self->{'domain'},$resource->{'symb'},'LONcatInfo');
+ $result .= &Apache::loncommon::pgrdlink('',$self->{'name'},$self->{'domain'},$resource->{'symb'},'LONcatInfo');
+ $result .= &Apache::loncommon::pprmlink('',$self->{'name'},$self->{'domain'},$resource->{'symb'},'LONcatInfo');
return $result;
}