[prev in list] [next in list] [prev in thread] [next in thread] 

List:       lon-capa-cvs
Subject:    [LON-CAPA-cvs] cvs: loncom /interface londocs.pm
From:       www <www () source ! lon-capa ! org>
Date:       2011-01-21 1:30:07
Message-ID: cvswww1295573407 () cvsserver
[Download RAW message or body]

www		Fri Jan 21 01:30:07 2011 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  The special documents section was too long
  This also more clearly separates menus for folder and reduced menus for pages.
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.450 loncom/interface/londocs.pm:1.451
--- loncom/interface/londocs.pm:1.450	Tue Jan 18 00:22:02 2011
+++ loncom/interface/londocs.pm	Fri Jan 21 01:30:07 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.450 2011/01/18 00:22:02 www Exp $
+# $Id: londocs.pm,v 1.451 2011/01/21 01:30:07 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2945,7 +2945,7 @@
                 'sipa' => 'Simple Course Page',
                 'sipr' => 'Simple Problem',
                 'drbx' => 'Drop Box',
-                'scuf' => 'Score Upload Form',
+                'scuf' => 'External Scores (handgrade, upload, clicker)',
                 'bull' => 'Discussion Board',
                 'mypi' => 'My Personal Information Page',
                 'grpo' => 'Group Portfolio',
@@ -3197,11 +3197,14 @@
 
 my $specialdocumentsform;
 my @specialdocumentsforma;
+my $gradingform;
+my @gradingforma;
+my $communityform;
+my @communityforma;
 my $newfolderform;
 my $newfolderb;
 
-       unless ($env{'form.pagepath'}) {
-	   my $path = &HTML::Entities::encode($env{'form.folderpath'},'<>&"');
+	my $path = &HTML::Entities::encode($env{'form.folderpath'},'<>&"');
 	
 	my $newpageform=(<<NPFORM);
 	<form action="/adm/coursedocs" method="post" name="newpage">
@@ -3248,35 +3251,35 @@
 	@specialdocumentsforma=(
 	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/page.png" \
alt="'.$lt{newp}.'"  \
onclick="javascript:makenewpage(document.newpage,\''.$pageseq.'\');" \
/>'=>$newpageform},  {'<img class="LC_noBorder LC_middle" \
src="/res/adm/pages/syllabus.png" alt="'.$lt{syll}.'" \
                onclick="document.newsyl.submit()" />'=>$newsylform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/groupportfolio.png" \
alt="'.$lt{grpo}.'" onclick="document.newgroupfiles.submit()" \
                />'=>$newgroupfileform},
-	);
+	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/navigation.png" \
alt="'.$lt{navc}.'" onclick="document.newnav.submit()" />'=>$newnavform}, +        \
{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/simple.png" \
alt="'.$lt{sipa}.'" onclick="javascript:makesmppage();" />'=>$newsmppageform}, +      \
); +        $specialdocumentsform = \
&create_form_ul(&create_list_elements(@specialdocumentsforma)); +
 
         my @importdoc = (
         {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/extres.png" \
alt="'.$lt{extr}.'" onclick="javascript:makenewext(\'newext\');" \
                />'=>$extresourcesform},
         {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/ims.png" \
                alt="'.$lt{imsf}.'" onclick="javascript:makeims();" \
                />'=>$imspform},);
         $fileuploadform =  &create_form_ul(&create_list_elements(@importdoc)) . \
'<hr/>' . $fileuploadform;  
-	push @specialdocumentsforma, ({'<img class="LC_noBorder LC_middle" \
src="/res/adm/pages/navigation.png" alt="'.$lt{navc}.'" \
                onclick="document.newnav.submit()" />'=>$newnavform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/simple.png" \
                alt="'.$lt{sipa}.'" onclick="javascript:makesmppage();" \
                />'=>$newsmppageform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/simpprob.png" \
                alt="'.$lt{sipr}.'" onclick="javascript:makesmpproblem();" \
                />'=>$newsmpproblemform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/dropbox.png" \
                alt="'.$lt{drbx}.'" onclick="javascript:makedropbox();" \
                />'=>$newdropboxform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/scoreupfrm.png" \
                alt="'.$lt{scuf}.'" onclick="javascript:makeexamupload();" \
                />'=>$newexuploadform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/bchat.png" \
                alt="'.$lt{bull}.'" onclick="javascript:makebulboard();" \
                />'=>$newbulform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/myaboutme.png" \
                alt="'.$lt{mypi}.'" onclick="javascript:makebulboard();" \
                />'=>$newaboutmeform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/aboutme.png" \
                alt="'.$lt{abou}.'" onclick="javascript:makeabout();" \
                />'=>$newaboutsomeoneform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/clst.png" \
alt="'.$lt{rost}.'" onclick="document.newroster.submit()" />'=>$newrosterform},); +   \
@gradingforma=( +        {'<img class="LC_noBorder LC_middle" \
src="/res/adm/pages/simpprob.png" alt="'.$lt{sipr}.'" \
onclick="javascript:makesmpproblem();" />'=>$newsmpproblemform}, +        {'<img \
class="LC_noBorder LC_middle" src="/res/adm/pages/dropbox.png" alt="'.$lt{drbx}.'" \
onclick="javascript:makedropbox();" />'=>$newdropboxform}, +        {'<img \
class="LC_noBorder LC_middle" src="/res/adm/pages/scoreupfrm.png" alt="'.$lt{scuf}.'" \
onclick="javascript:makeexamupload();" />'=>$newexuploadform}, +
+        );
+        $gradingform = &create_form_ul(&create_list_elements(@gradingforma));
+
+        @communityforma=(
+       {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/bchat.png" \
alt="'.$lt{bull}.'" onclick="javascript:makebulboard();" />'=>$newbulform}, +        \
{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/myaboutme.png" \
alt="'.$lt{mypi}.'" onclick="javascript:makebulboard();" />'=>$newaboutmeform}, +     \
{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/aboutme.png" \
alt="'.$lt{abou}.'" onclick="javascript:makeabout();" />'=>$newaboutsomeoneform}, +   \
{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/clst.png" \
alt="'.$lt{rost}.'" onclick="document.newroster.submit()" />'=>$newrosterform}, +     \
{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/groupportfolio.png" \
alt="'.$lt{grpo}.'" onclick="document.newgroupfiles.submit()" \
/>'=>$newgroupfileform}, +        );
+        $communityform = &create_form_ul(&create_list_elements(@communityforma));
 
-	$specialdocumentsform = \
                &create_form_ul(&create_list_elements(@specialdocumentsforma));
-      }
 
-if($env{'form.pagepath'}) {
-	
-	@specialdocumentsforma=(
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/simpprob.png" \
alt="'.&mt('Simple Problem').'" onclick="javascript:makesmpproblem();" \
                />'=>$newsmpproblemform},
-	{'<img class="LC_noBorder LC_middle" src="/res/adm/pages/scoreupfrm.png" \
alt="'.&mt('Score Upload Form').'" onclick="javascript:makeexamupload();" \
                />'=>$newexuploadform}
-	);
-	$specialdocumentsform= \
                &create_form_ul(&create_list_elements(@specialdocumentsforma));
-}
 
 my @tools = (
 #	{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/extres.png" \
alt="'.$lt{extr}.'" />'=>$extresourcesform}, @@ -3287,11 +3290,13 @@
 my %orderhash = (
                 'aa' => ['Import Documents',$fileuploadform],
                 'bb' => ['Published Resources',$simpleeditdefaultform],
-                'cc' => ['Special Documents',$specialdocumentsform],
-		'dd' => ['Tools', \
&create_form_ul(&create_list_elements(@tools)).&generate_admin_options(\%help,\%env)],
 +                'cc' => ['Grading Resources',$gradingform],
+		'ff' => ['Tools', \
&create_form_ul(&create_list_elements(@tools)).&generate_admin_options(\%help,\%env)],
  );
-unless($env{'form.pagepath'}) {
+unless ($env{'form.pagepath'}) {
     $orderhash{'00'} = ['Newfolder',$newfolderform];
+    $orderhash{'dd'} = ['Community Resources',$communityform];
+    $orderhash{'ee'} = ['Special Documents',$specialdocumentsform];
 }
 
  $hadchanges=0;
@@ -3572,7 +3577,7 @@
                                           t_mnf => 'New Folder',
                                           p_mnp => 'Name of New Page',
                                           t_mnp => 'New Page',
-                                          p_mxu => 'Title for the Uploaded Score',
+                                          p_mxu => 'Title for the External Score',
                                           p_msp => 'Name of Simple Course Page',
                                           p_msb => 'Title for the Problem',
                                           p_mdb => 'Title for the Drop Box',


_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs


[prev in list] [next in list] [prev in thread] [next in thread] 

Configure | About | News | Add a list | Sponsored by KoreLogic