--- loncom/interface/londocs.pm 2010/03/18 13:48:45 1.422
+++ loncom/interface/londocs.pm 2010/04/14 13:58:11 1.426
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.422 2010/03/18 13:48:45 onken Exp $
+# $Id: londocs.pm,v 1.426 2010/04/14 13:58:11 wenzelju Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -121,7 +121,7 @@ sub dumpbutton {
if ($home+$other==0) { return ''; }
if ($home) {
my $link =
- ""
.&mt('Dump '.$crstype.' Documents to Construction Space')
@@ -268,7 +268,7 @@ sub dumpcourse {
sub exportbutton {
my $crstype = &Apache::loncommon::course_type();
- return "".&mt('IMS Export')."".
+ return "".
&Apache::loncommon::help_open_topic('Docs_Export_Course_Docs').'
';
}
@@ -1637,7 +1637,9 @@ sub editor {
$r->print('');
}
- my $output;
+ my $output;
+
+ &Apache::loncommon::start_data_table_count(); #setup a row counter
foreach my $res (@LONCAPA::map::order) {
my ($name,$url)=split(/\:/,$LONCAPA::map::resources[$res]);
$name=&LONCAPA::map::qtescape($name);
@@ -1649,6 +1651,8 @@ sub editor {
$idx++;
$shown++;
}
+ &Apache::loncommon::end_data_table_count();
+
if ($shown) {
$r->print(&Apache::loncommon::start_data_table());
if ($allowed) {
@@ -2914,7 +2918,7 @@ sub create_form_ul {
'newp' => 'New Composite Page',
'extr' => 'External Resource',
'syll' => 'Syllabus',
- 'navc' => 'Navigate Contents',
+ 'navc' => 'Table of Contents',
'sipa' => 'Simple Course Page',
'sipr' => 'Simple Problem',
'drbx' => 'Drop Box',
@@ -2977,9 +2981,9 @@ FUFORM
SEDFFORM
my @simpleeditdefaultforma = (
- { '
' => "$uploadtag$lt{'srch'}" },
- { '
' => "$lt{'impo'}$help{'Importing_LON-CAPA_Resource'}" },
- { '
' => "$lt{'book'}" },
+ { '
' => "$uploadtag" },
+ { '
' => "$help{'Importing_LON-CAPA_Resource'}" },
+ { '
' => "" },
);
$simpleeditdefaultform .= create_form_ul(create_list_elements(@simpleeditdefaultforma));
$simpleeditdefaultform .=(<
$uploadtag
- $lt{'extr'}$help{'Adding_External_Resource'}
+ $help{'Adding_External_Resource'}
ERFORM
@@ -3115,14 +3119,14 @@ HIDDENFORM
my $recoverform=(<
- $lt{'reco'}
+
RFORM
my $imspform=(<
- $lt{'imsf'}
+
IMSPFORM
@@ -3132,7 +3136,7 @@ IMSPFORM
$uploadtag
- $lt{'navc'}
+
$help{'Navigate_Content'}
NNFORM
@@ -3141,7 +3145,7 @@ NNFORM
$uploadtag
- $lt{'sipa'}
+
$help{'Simple Page'}
NSPFORM
@@ -3151,7 +3155,7 @@ NSPFORM
$uploadtag
- $lt{'sipr'}
+
$help{'Simple Problem'}
@@ -3162,7 +3166,7 @@ NSPROBFORM
$uploadtag
- $lt{'drbx'}
+
NDBFORM
@@ -3171,7 +3175,7 @@ NDBFORM
$uploadtag
- $lt{'scuf'}
+
$help{'Score_Upload_Form'}
NEXUFORM
@@ -3181,7 +3185,7 @@ NEXUFORM
$uploadtag
- $lt{'bull'}
+
$help{'Bulletin Board'}
NBFORM
@@ -3192,7 +3196,7 @@ NBFORM
$uploadtag
- $lt{'mypi'}
+
$help{'My Personal Information Page'}
NAMFORM
@@ -3202,7 +3206,7 @@ NAMFORM
$uploadtag
- $lt{'abou'}
+
NASOFORM
@@ -3213,7 +3217,7 @@ NASOFORM
$uploadtag
- $lt{'rost'}
+
$help{'Course Roster'}
NROSTFORM
@@ -3231,7 +3235,7 @@ my $newfolderb;
- $lt{'newp'}
+
$help{'Adding_Pages'}
NPFORM
@@ -3252,7 +3256,7 @@ NFFORM
$uploadtag
- $lt{'syll'}
+
$help{'Syllabus'}
@@ -3264,7 +3268,7 @@ NSYLFORM
$uploadtag
- $lt{'grpo'}
+
$help{'Group Portfolio'}
NGFFORM
@@ -3283,7 +3287,7 @@ NGFFORM
{'
'=>$newbulform},
{'
'=>$newaboutmeform},
{'
'=>$newaboutsomeoneform},
- {'
'=>$newrosterform},);
+ {'
'=>$newrosterform},);
$specialdocumentsform = create_form_ul(create_list_elements(@specialdocumentsforma));
@@ -3380,7 +3384,7 @@ SUPDOCFORM
- $lt{'newf'}
+
$help{'Adding_Folders'}
SNFFORM
@@ -3391,7 +3395,7 @@ SNFFORM
- $lt{'extr'} $help{'Adding_External_Resource'}
+ $help{'Adding_External_Resource'}
SNEFORM
@@ -3401,7 +3405,7 @@ SNEFORM
- $lt{'syll'}
+
$help{'Syllabus'}
SNSFORM
@@ -3412,7 +3416,7 @@ SNSFORM
- $lt{'mypi'}
+
$help{'My Personal Information Page'}
SNAMFORM
@@ -3492,19 +3496,19 @@ sub generate_admin_options {
my $exportbut=&exportbutton();
my @list = (
{'
'
- => "$lt{'vc'}$help{'Verify_Content'}"},
+ => "$help{'Verify_Content'}"},
{'
'
- =>"$lt{'cv'}$help{'Check_Resource_Versions'}"},
+ =>"$help{'Check_Resource_Versions'}"},
);
if($dumpbut ne ''){
push @list, {'
'=>$dumpbut};
}
- push @list, ({'
'
+ push @list, ({'
'
=>$exportbut},
{'
'
- =>"$lt{'ls'}"},
- {'
'
- =>"$lt{'sl'}"},
+ =>""},
+ {'
'
+ =>""},
);
return '';