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

[www]

www		Thu Oct 10 13:17:11 2002 EDT

  Modified files:              
    /loncom/interface	londocs.pm mydesk.tab 
  Log:
  DOCS button more important in version 0.6, closer to NAV.
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.24 loncom/interface/londocs.pm:1.25
--- loncom/interface/londocs.pm:1.24	Wed Oct  9 16:16:12 2002
+++ loncom/interface/londocs.pm	Thu Oct 10 13:17:11 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.24 2002/10/09 20:16:12 www Exp $
+# $Id: londocs.pm,v 1.25 2002/10/10 17:17:11 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -327,6 +327,14 @@
   $r->print('</head>'.
             &Apache::loncommon::bodytag('Course Documents','',$events));
   unless ($showdoc) {
+    if ($allowed) {
+       $r->print(<<ENDCOURSEVERIFY);
+<form name="courseverify">
+<input type="submit" name="verify" value="Verify Content" />
+<input type="submit" name="versions" value="Check Resource Versions" />
+</form>
+ENDCOURSEVERIFY
+    }
 # --------------------------------------------------------- Standard documents
     $r->print('<table>');
     if (($standard) && ($allowed) && (!$forcesupplement)) {
Index: loncom/interface/mydesk.tab
diff -u loncom/interface/mydesk.tab:1.29 loncom/interface/mydesk.tab:1.30
--- loncom/interface/mydesk.tab:1.29	Fri Aug 30 12:19:09 2002
+++ loncom/interface/mydesk.tab	Thu Oct 10 13:17:11 2002
@@ -15,7 +15,8 @@
 1:1:smp:rst:courses.gif:switch:course:go('/adm/roles');:Switch Course
 1:1:adv:any:roles.gif:switch:role:go('/adm/roles');:Switch Role
 1:1:adv:rcm:roles.gif:choose:role:go('/adm/roles');:Choose Role
-1:2:any:any:com.gif:commu-:nication:go('/adm/communicate');:Communicate/Messages
+1:2:clear
+1:2:course:any:docs.gif:course:docs:go('/adm/coursedocs');:Course Documents
 2:1:clear
 2:2:clear
 2:2:course:any:nav.gif:navigate:contents:gopost('/adm/navmaps',currentURL);:Navigate Contents
@@ -48,8 +49,7 @@
 7:2:adv:rcm:egrd.gif:enter:grades:go('/adm/grades');:Enter Grades
 10:1:clear
 10:1:any:any:anno.gif:calendar:announce:go('/adm/announcements');:Announcements and Calendar
-10:2:clear
-10:2:course:any:docs.gif:course:docs:go('/adm/coursedocs');:Course Documents
+10:2:any:any:com.gif:commu-:nication:go('/adm/communicate');:Communicate/Messages
 10:3:clear
 10:3:course:any:bchat.gif:course:chat:go('/res/adm/pages/chatroom.html');:Chat
 11:1:adv:any:src.gif:search:library:go('/adm/searchcat');:Search Published Resources