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

Thu, 16 Mar 2006 21:34:13 -0000

albertel		Thu Mar 16 16:34:13 2006 EDT

  Modified files:              
    /loncom/interface	loncommon.pm lonpickstudent.pm 
  Log:
  - renaming the args elements for easier reading
  - adding no_nav_bar arg to pickstudent
  
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.309 loncom/interface/loncommon.pm:1.310

--- loncom/interface/loncommon.pm:1.309	Thu Mar 16 16:23:51 2006
+++ loncom/interface/loncommon.pm	Thu Mar 16 16:34:03 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.309 2006/03/16 21:23:51 albertel Exp $
+# $Id: loncommon.pm,v 1.310 2006/03/16 21:34:03 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3036,8 +3036,8 @@
 Inputs: $title - optional title for the page
         $head_extra - optional extra HTML to incude inside the <head>
         %args - additional optional args supported are:
-                  onlybody -> is true will set &bodytag() onlybodytag arg on
-                  notopbar -> is true will set &bodytag() notopbar arg on
+                  only_body  -> is true will set &bodytag() onlybodytag arg on
+                  no_nav_bar -> is true will set &bodytag() notopbar arg on
 
 =back
 
@@ -3048,8 +3048,8 @@
     return 
 	&Apache::lonxml::xmlbegin().
 	&headtag($title,$head_extra).&endheadtag().
-	&bodytag($title,undef,undef,$args->{'onlybody'},undef,undef,undef,
-		 $args->{'notopbar'});
+	&bodytag($title,undef,undef,$args->{'only_body'},undef,undef,undef,
+		 $args->{'no_nav_bar'});
 }
 
 =pod
Index: loncom/interface/lonpickstudent.pm
diff -u loncom/interface/lonpickstudent.pm:1.12 loncom/interface/lonpickstudent.pm:1.13
--- loncom/interface/lonpickstudent.pm:1.12	Thu Mar 16 16:15:16 2006
+++ loncom/interface/lonpickstudent.pm	Thu Mar 16 16:34:04 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Pick a student from the classlist
 #
-# $Id: lonpickstudent.pm,v 1.12 2006/03/16 21:15:16 raeburn Exp $
+# $Id: lonpickstudent.pm,v 1.13 2006/03/16 21:34:04 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -42,7 +42,8 @@
     return OK if $r->header_only;
 
 # ------------------------------------------------------------ Print the screen
-    $r->print(&Apache::loncommon::start_page("Selecting a User"));
+    $r->print(&Apache::loncommon::start_page("Selecting a User",undef,
+					     {'no_nav_bar' => 1}));
 
 
     &Apache::loncommon::get_unprocessed_cgi



