--- loncom/interface/loncommon.pm 2008/07/12 14:16:32 1.669
+++ loncom/interface/loncommon.pm 2008/08/04 22:08:19 1.673
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.669 2008/07/12 14:16:32 raeburn Exp $
+# $Id: loncommon.pm,v 1.673 2008/08/04 22:08:19 felicia Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -904,6 +904,9 @@ sub helpLatexCheatsheet {
.'
'.
&Apache::loncommon::help_open_topic("Other_Symbols",&mt('Other Symbols'),
undef,undef,600)
+ .' | '.
+ &Apache::loncommon::help_open_topic("Authoring_Output_Tags",&mt('Output Tags'),
+ undef,undef,600)
.' | ';
}
@@ -913,6 +916,8 @@ sub general_help {
$helptopic='Authoring_Intro';
} elsif ($env{'request.role'}=~/^cc/) {
$helptopic='Course_Coordination_Intro';
+ } elsif ($env{'request.role'}=~/^dc/) {
+ $helptopic='Domain_Coordination_Intro';
}
return $helptopic;
}
@@ -7243,7 +7248,6 @@ sub check_for_upload {
}
}
}
- my $getpropath = 1;
if (($current_disk_usage + $filesize) > $disk_quota){
my $msg = ''.
&mt('Unable to upload [_1]. (size = [_2] kilobytes). Disk quota will be exceeded.',''.$fname.'',$filesize).''.
@@ -8509,7 +8513,7 @@ sub assign_categories_table {
}
$output .= ''
.''.&escape($parent).' | ';
+ $item.'"'.$checked.' />'.$parent.'';
my $depth = 1;
push(@path,$parent);
$output .= &assign_category_rows($itemcount,\@cats,$depth,$parent,\@path,\@currcategories);