[LON-CAPA-cvs] cvs: loncom /interface londocs.pm

[ehlerst]

ehlerst		Tue Mar  3 17:45:16 2009 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  moved "New Folder" button from "Special Documents" to "New Document".
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.350 loncom/interface/londocs.pm:1.351
--- loncom/interface/londocs.pm:1.350	Tue Mar  3 16:57:24 2009
+++ loncom/interface/londocs.pm	Tue Mar  3 17:45:15 2009
@@ -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.351 2009/03/03 17:45:15 ehlerst Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3060,6 +3060,7 @@
 NROSTFORM
 
 my $specialdocumentsform;
+my $newfolderform;
 
        unless ($env{'form.pagepath'}) {
 	   my $path = &HTML::Entities::encode($env{'form.folderpath'},'<>&"');
@@ -3076,7 +3077,7 @@
 	</form>
 NPFORM
 
-	my $newfolderform=(<<NFFORM);
+	$newfolderform=(<<NFFORM);
 	<form action="/adm/coursedocs" method="post" name="newfolder">
 	<input type="hidden" name="folderpath" value="$path" />
 	<input type="hidden" name="importdetail" value="" />
@@ -3112,7 +3113,7 @@
 	</form>
 NGFFORM
 
-	$specialdocumentsform="<br />$newfolderform<br />$newpageform<br />$newsylform<br />$newgroupfileform";
+	$specialdocumentsform="<br />$newpageform<br />$newsylform<br />$newgroupfileform";
       }
 	$specialdocumentsform.="<br />$newnavform<br />$newsmppageform
 				<br />$newsmpproblemform<br />$newdropboxform
@@ -3131,7 +3132,7 @@
                 'zz' => 'Hide all Options',
                 );
 my %namehash = (
-                'New Document' => $fileuploadform,
+                'New Document' => $fileuploadform.'<br />'.$newfolderform,
                 'Published Documents' => $simpleeditdefaultform,
                 'Special Documents' => $specialdocumentsform,
 		'More Options' => $extresourcesform.'<br />'.$imspform.'<br />'.$recoverform,