[LON-CAPA-cvs] cvs: rat / lonratedt.pm loncom/interface loncreateuser.pm londocs.pm londropadd.pm lonhelp.pm lonparmset.pm lonsearchcat.pm lonstatistics.pm loncom/interface/spreadsheet lonspreadsheet.pm

www lon-capa-cvs@mail.lon-capa.org
Thu, 15 Jan 2004 03:18:20 -0000


This is a MIME encoded message

--www1074136700
Content-Type: text/plain

www		Wed Jan 14 22:18:20 2004 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm londocs.pm londropadd.pm 
                     	lonhelp.pm lonparmset.pm lonsearchcat.pm 
                     	lonstatistics.pm 
    /loncom/interface/spreadsheet	lonspreadsheet.pm 
    /rat	lonratedt.pm 
  Log:
  Help buttons
  
  
--www1074136700
Content-Type: text/plain
Content-Disposition: attachment; filename="www-20040114221820.txt"

Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.75 loncom/interface/loncreateuser.pm:1.76
--- loncom/interface/loncreateuser.pm:1.75	Wed Dec 31 21:16:29 2003
+++ loncom/interface/loncreateuser.pm	Wed Jan 14 22:18:19 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.75 2004/01/01 02:16:29 www Exp $
+# $Id: loncreateuser.pm,v 1.76 2004/01/15 03:18:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -124,7 +124,9 @@
     my @domains = &Apache::loncommon::get_domains();
     my $domform = &Apache::loncommon::select_dom_form($defdom,'ccdomain');
     my $bodytag =&Apache::loncommon::bodytag(
-                                  'Create Users, Change User Privileges');
+                                  'Create Users, Change User Privileges').
+		  &Apache::loncommon::help_open_faq(282).
+		  &Apache::loncommon::help_open_bug('Instructor Interface');
     my $selscript=&Apache::loncommon::studentbrowser_javascript();
     my $sellink=&Apache::loncommon::selectstudent_link
                                         ('crtuser','ccuname','ccdomain');
@@ -140,6 +142,8 @@
                     'nr'   => "Name of Role",
                     'cre'  => "Custom Role Editor"
 				       );
+    my $helpsiur=&Apache::loncommon::help_open_topic('Course_Change_Privileges');
+    my $helpecpr=&Apache::loncommon::help_open_topic('Course_Editing_Custom_Roles');
     $r->print(<<"ENDDOCUMENT");
 <html>
 <head>
@@ -149,7 +153,7 @@
 $bodytag
 <form action="/adm/createuser" method="post" name="crtuser">
 <input type="hidden" name="phase" value="get_user_info">
-<h2>$lt{siur}</h2>
+<h2>$lt{siur}$helpsiur</h2>
 <table>
 <tr><td>$lt{usr}:</td><td><input type="text" size="15" name="ccuname">
 </td><td rowspan="2">$sellink</td></tr><tr><td>
@@ -159,7 +163,7 @@
 </form>
 <form action="/adm/createuser" method="post" name="docustom">
 <input type="hidden" name="phase" value="selected_custom_edit">
-<h2>$lt{'ecrp'}</h2>
+<h2>$lt{'ecrp'}$helpecpr</h2>
 $lt{'nr'}: $choice <input type="text" size="15" name="newrolename" /><br />
 <input name="customeditor" type="submit" value="$lt{'cre'}" />
 </body>
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.98 loncom/interface/londocs.pm:1.99
--- loncom/interface/londocs.pm:1.98	Mon Jan 12 20:55:22 2004
+++ loncom/interface/londocs.pm	Wed Jan 14 22:18:19 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.98 2004/01/13 01:55:22 www Exp $
+# $Id: londocs.pm,v 1.99 2004/01/15 03:18:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -962,7 +962,9 @@
 # -------------------------------------------------------------------- Body tag
   $r->print('</head>'.
             &Apache::loncommon::bodytag('Course Documents','',$events,
-					'','',$showdoc));
+					'','',$showdoc).
+	    &Apache::loncommon::help_open_faq(273).
+	    &Apache::loncommon::help_open_bug('RAT'));
   unless ($showdoc) {
 # -----------------------------------------------------------------------------
        my %lt=&Apache::lonlocal::texthash(
Index: loncom/interface/londropadd.pm
diff -u loncom/interface/londropadd.pm:1.97 loncom/interface/londropadd.pm:1.98
--- loncom/interface/londropadd.pm:1.97	Sat Dec 27 20:30:50 2003
+++ loncom/interface/londropadd.pm	Wed Jan 14 22:18:19 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to drop and add students in courses 
 #
-# $Id: londropadd.pm,v 1.97 2003/12/28 01:30:50 raeburn Exp $
+# $Id: londropadd.pm,v 1.98 2004/01/15 03:18:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -42,7 +42,9 @@
 ###############################################################
 ###############################################################
 sub header {
-    my $bodytag=&Apache::loncommon::bodytag('Enrollment Manager');
+    my $bodytag=&Apache::loncommon::bodytag('Enrollment Manager').
+	&Apache::loncommon::help_open_faq(9).
+	&Apache::loncommon::help_open_bug('Instructor Interface');
     my $title = &mt('LON-CAPA Enrollment Manager');
     return(<<ENDHEAD);
 <html>
@@ -143,28 +145,34 @@
          'view'      => 'View Class List',
          'drop'      => 'Drop Students',
          'populate'  => 'Automated Enrollment Manager');
+    my %help=();
+    foreach ('Course_Drop_Student','Course_Add_Student',
+	     'Course_Modify_Student_Data','Course_View_Class_List',
+	     'Course_Create_Class_List') {
+	$help{$_}=&Apache::loncommon::help_open_topic($_);
+    }
 
     $r->print(<<END);
 <p>
 <font size="+1">
-    <a href="/adm/dropadd?action=upload">$Text{'upload'}</a>
-</font>
+<a href="/adm/dropadd?action=upload">$Text{'upload'}</a>
+</font>$help{'Course_Create_Class_List'}
 </p><p>
 <font size="+1">
     <a href="/adm/dropadd?action=enrollstudent">$Text{'enrollone'}</a>
-</font>
+    </font>$help{'Course_Add_Student'}
 </p><p>
 <font size="+1">
     <a href="/adm/dropadd?action=modifystudent">$Text{'modify'}</a>
-</font>
+    </font>$help{'Course_Modify_Student_Data'}
 </p><p>
 <font size="+1">
     <a href="/adm/dropadd?action=classlist">$Text{'view'}</a>
-</font>
+    </font>$help{'Course_View_Class_List'}
 </p><p>
 <font size="+1">
     <a href="/adm/dropadd?action=drop">$Text{'drop'}</a>
-</font>
+    </font>$help{'Course_Drop_Student'}
 </p><p>
 <font size="+1">
     <a href="/adm/populate">$Text{'populate'}</a>
Index: loncom/interface/lonhelp.pm
diff -u loncom/interface/lonhelp.pm:1.13 loncom/interface/lonhelp.pm:1.14
--- loncom/interface/lonhelp.pm:1.13	Tue Jan 13 14:43:42 2004
+++ loncom/interface/lonhelp.pm	Wed Jan 14 22:18:19 2004
@@ -53,7 +53,9 @@
 sub serveTex
 {
     my ($tex, $r) = @_;
-
+    my $bugs=&Apache::loncommon::help_open_bug('Documentation');
+    my $header=&mt('LON-CAPA Help');
+    my $footer=&mt('About LON-CAPA help and More Help');
 $r->print(<<HEADER);
 <html>
     <head>
@@ -61,7 +63,7 @@
     </head>
     <body bgcolor="#FFFFFF">
     <h3 style="font: sans-serif"><img align="right"
-    src="/adm/help/gif/lonhelpheader.gif"/>LON-CAPA Help<hr /></h3>
+    src="/adm/help/gif/lonhelpheader.gif"/>$header<hr />$bugs</h3>
     <!-- BEGIN -->
 HEADER
 
@@ -71,8 +73,7 @@
 $r->print(<<FOOTER);
     <!-- END -->
     <hr />
-    <center><font size="-1"><a href="/adm/help/abouthelp.html">About
-    LON-CAPA help and More Help</a></font></center>
+    <center><font size="-1"><a href="/adm/help/abouthelp.html">$footer</a></font></center>
     </body>
 </html>
 FOOTER
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.147 loncom/interface/lonparmset.pm:1.148
--- loncom/interface/lonparmset.pm:1.147	Wed Jan 14 17:08:23 2004
+++ loncom/interface/lonparmset.pm	Wed Jan 14 22:18:19 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.147 2004/01/14 22:08:23 www Exp $
+# $Id: lonparmset.pm,v 1.148 2004/01/15 03:18:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -306,7 +306,10 @@
 		    'oi'    => "or ID",
 		    'ad'    => "at Domain"
 				       );
-    my $overallhelp=&Apache::loncommon::help_open_topic("Course_Setting_Parameters","Parameters");
+    my $overallhelp=
+	&Apache::loncommon::help_open_topic("Course_Setting_Parameters").
+	&Apache::loncommon::help_open_faq(10).
+	&Apache::loncommon::help_open_bug('Instructor Interface');
     my $assessparmhelp=&Apache::loncommon::help_open_topic("Cascading_Parameters","Assessment Parameters");
     $r->print(<<ENDHEAD);
 <html>
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.202 loncom/interface/lonsearchcat.pm:1.203
--- loncom/interface/lonsearchcat.pm:1.202	Fri Jan  2 14:23:47 2004
+++ loncom/interface/lonsearchcat.pm	Wed Jan 14 22:18:19 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Search Catalog
 #
-# $Id: lonsearchcat.pm,v 1.202 2004/01/02 19:23:47 www Exp $
+# $Id: lonsearchcat.pm,v 1.203 2004/01/15 03:18:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -359,7 +359,8 @@
 
 sub course_search {
     my $r=shift;
-    my $bodytag=&Apache::loncommon::bodytag('Course Search');
+    my $bodytag=&Apache::loncommon::bodytag('Course Search').
+	&Apache::loncommon::help_open_bug('Searching');
     my $pretty_search_string = '<b>'.$ENV{'form.courseexp'}.'</b>';
     my $search_string = $ENV{'form.courseexp'};
     my @New_Words;
@@ -375,7 +376,7 @@
     my @allwords=($search_string,@New_Words);
     $totalfound=0;
     $r->print('<html><head><title>LON-CAPA Course Search</title></head>'.
-	      $bodytag.$pretty_search_string);
+	      $bodytag.'<hr /><center><font size="+2" face="arial">'.$pretty_search_string.'</font></center><hr />');
     $r->rflush();
 # ======================================================= Go through the course
     undef %alreadyseen;
@@ -468,7 +469,9 @@
 
 sub print_basic_search_form{
     my ($r,$closebutton,$hidden_fields) = @_;
-    my $bodytag=&Apache::loncommon::bodytag('Search');
+    my $bodytag=&Apache::loncommon::bodytag('Search').
+	&Apache::loncommon::help_open_topic('Finding_Resources').
+	&Apache::loncommon::help_open_bug('Searching');
     my $scrout=<<"ENDDOCUMENT";
 <html>
 <head>
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.92 loncom/interface/lonstatistics.pm:1.93
--- loncom/interface/lonstatistics.pm:1.92	Wed Dec 24 16:54:58 2003
+++ loncom/interface/lonstatistics.pm	Wed Jan 14 22:18:19 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstatistics.pm,v 1.92 2003/12/24 21:54:58 www Exp $
+# $Id: lonstatistics.pm,v 1.93 2004/01/15 03:18:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1117,7 +1117,9 @@
                                              'SelectedStudent']);
     #
     # Give the LON-CAPA page header
-    $r->print(&Apache::lonhtmlcommon::Title('Course Statistics and Charts'));
+    $r->print(&Apache::lonhtmlcommon::Title('Course Statistics and Charts').
+	      &Apache::loncommon::help_open_faq(139).
+	      &Apache::loncommon::help_open_bug('Statistics and Charts'));
     $r->rflush();
     # 
     # Either print out a menu for them or send them to a report
Index: loncom/interface/spreadsheet/lonspreadsheet.pm
diff -u loncom/interface/spreadsheet/lonspreadsheet.pm:1.31 loncom/interface/spreadsheet/lonspreadsheet.pm:1.32
--- loncom/interface/spreadsheet/lonspreadsheet.pm:1.31	Mon Dec  8 14:59:09 2003
+++ loncom/interface/spreadsheet/lonspreadsheet.pm	Wed Jan 14 22:18:20 2004
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.31 2003/12/08 19:59:09 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.32 2004/01/15 03:18:20 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -366,6 +366,8 @@
 ENDSCRIPT
     }
     $r->print('</head>'.&Apache::loncommon::bodytag('Grades Spreadsheet').
+	      &Apache::loncommon::help_open_faq(134).
+	      &Apache::loncommon::help_open_bug('Spreadsheet').
               '<form action="'.$r->uri.'" name="sheet" method="post">');
     $r->print(&hiddenfield('sname'  ,$ENV{'form.sname'}).
               &hiddenfield('sdomain',$ENV{'form.sdomain'}).
Index: rat/lonratedt.pm
diff -u rat/lonratedt.pm:1.52 rat/lonratedt.pm:1.53
--- rat/lonratedt.pm:1.52	Wed Jan 14 17:47:46 2004
+++ rat/lonratedt.pm	Wed Jan 14 22:18:20 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Edit Handler for RAT Maps
 #
-# $Id: lonratedt.pm,v 1.52 2004/01/14 22:47:46 www Exp $
+# $Id: lonratedt.pm,v 1.53 2004/01/15 03:18:20 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -911,7 +911,10 @@
 
 # ----------------------------------------------------- Start simple RAT screen
    my $editscript=&editscript('simple');
-   my $bodytag=&Apache::loncommon::bodytag(undef,undef,undef,1);
+   my $bodytag=&Apache::loncommon::bodytag(undef,undef,undef,1).
+       &Apache::loncommon::help_open_topic('Sequence_Simple_Editor_Creation').
+       &Apache::loncommon::help_open_faq(6).
+       &Apache::loncommon::help_open_bug('RAT');
    my %lt=&Apache::lonlocal::texthash(
 				      'sa' => 'Save',
 				      'nt' => 'New Title',
@@ -1067,9 +1070,11 @@
     my ($r,$url,$adv,$errtext)=@_;
     $r->print('<html>'.
      &Apache::loncommon::bodytag('Edit Content of a Map').
-     &buttons($adv));
+	      &Apache::loncommon::help_open_faq(6).
+	      &Apache::loncommon::help_open_bug('RAT').
+	      &buttons($adv));
     if ($errtext) {
-	$r->print($errtext.'<hr>');
+	$r->print($errtext.'<hr />');
     }
     my $idx=0;
     $r->print('<h1>'.$url.'</h1>');

--www1074136700--