--- loncom/interface/londocs.pm 2009/03/03 16:57:24 1.350 +++ loncom/interface/londocs.pm 2009/03/05 10:56:59 1.352 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.350 2009/03/03 16:57:24 tempelho Exp $ +# $Id: londocs.pm,v 1.352 2009/03/05 10:56:59 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3060,6 +3060,7 @@ NASOFORM NROSTFORM my $specialdocumentsform; +my $newfolderform; unless ($env{'form.pagepath'}) { my $path = &HTML::Entities::encode($env{'form.folderpath'},'<>&"'); @@ -3076,7 +3077,7 @@ my $specialdocumentsform; NPFORM - my $newfolderform=(< @@ -3112,7 +3113,7 @@ NSYLFORM NGFFORM - $specialdocumentsform="
$newfolderform
$newpageform
$newsylform
$newgroupfileform"; + $specialdocumentsform="
$newpageform
$newsylform
$newgroupfileform"; } $specialdocumentsform.="
$newnavform
$newsmppageform
$newsmpproblemform
$newdropboxform @@ -3131,7 +3132,7 @@ my %orderhash = ( 'zz' => 'Hide all Options', ); my %namehash = ( - 'New Document' => $fileuploadform, + 'New Document' => $fileuploadform.'
'.$newfolderform, 'Published Documents' => $simpleeditdefaultform, 'Special Documents' => $specialdocumentsform, 'More Options' => $extresourcesform.'
'.$imspform.'
'.$recoverform, @@ -3383,7 +3384,7 @@ sub editing_js { p_mdb => 'Title for the Drop Box', p_mbb => 'Title for the Discussion Board', p_mab => "Enter user:domain for User's Personal Information Page", - p_mab2 => "Personal Information Page [_99]", + p_mab2 => 'Personal Information Page of ', p_mab_alrt1 => 'Not a valid user:domain', p_mab_alrt2 => 'Please enter both user and domain in the format user:domain', p_chn => 'New Title',