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

amueller amueller@source.lon-capa.org
Thu, 02 Apr 2009 15:09:10 -0000


amueller		Thu Apr  2 15:09:10 2009 EDT

  Modified files:              
    /loncom/interface	lonaboutme.pm 
  Log:
  -In Version 1.109 by mistake the anchor for the rss feeds was erased.
  - some code styling
  
Index: loncom/interface/lonaboutme.pm
diff -u loncom/interface/lonaboutme.pm:1.119 loncom/interface/lonaboutme.pm:1.120
--- loncom/interface/lonaboutme.pm:1.119	Fri Mar 27 15:46:38 2009
+++ loncom/interface/lonaboutme.pm	Thu Apr  2 15:09:10 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Personal Information Page
 #
-# $Id: lonaboutme.pm,v 1.119 2009/03/27 15:46:38 bisitz Exp $
+# $Id: lonaboutme.pm,v 1.120 2009/04/02 15:09:10 amueller Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -196,14 +196,14 @@
     }
 
 #------------Get rights
- my %courseenv=&Apache::lonnet::dump('environment',$cdom,$cnum);
- my %syllabus=&Apache::lonnet::dump('aboutme',$cdom,$cnum);
+	my %courseenv=&Apache::lonnet::dump('environment',$cdom,$cnum);
+ 	my %syllabus=&Apache::lonnet::dump('aboutme',$cdom,$cnum);
     my $allowed=0;
-  my $privleged=$allowed=(($env{'user.name'} eq $cnum) && 
+  	my $privleged=$allowed=(($env{'user.name'} eq $cnum) && 
 			       ($env{'user.domain'} eq $cdom));
-       if ($forcestudent or $target eq 'tex') { $allowed=0; } 
+    if ($forcestudent or $target eq 'tex') { $allowed=0; } 
+	
  
-
 # --------------------------------------- There is such a user, get environment
   
     if ($target ne 'tex') {
@@ -222,23 +222,23 @@
     }   
 
 #Print Privacy Note
-       if ($allowed) {          
+    if ($allowed) {          
            $r->print('<p class="LC_info">'
                     .'<b>'.&mt('Privacy Note:').'</b> '
                     .&mt('The information you submit can be viewed by anybody who is logged into LON-CAPA. Do not provide information that you are not ready to share publicly.')
                     .'</p>'
            );
-	} 
+	}
 
 #Print Help Text
-if  ($target ne 'tex') {
-	if($allowed){
-		$r->print(&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));
+	if ($target ne 'tex') {
+		if($allowed){
+			$r->print(&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));
+		}	
 	}
-}
 
 #----------------Print Functions
-	if( $target ne 'tex'){
+	if ($target ne 'tex'){
 		 $r->print(&Apache::lontemplate::start_functionslist());
       		if($allowed){
 			 my $query_string = &build_query_string({'forcestudent' => '1','popup' => $env{'form.popup'}});		
@@ -271,19 +271,19 @@
         $r->print(&Apache::lontemplate::end_functionslist());
 	}  
 #------Print Headtitle
- if ($target ne 'tex') {
-	 $r->print('<div class="LC_ContentBoxSpecial">');
-	$r->print('<h2 class="LC_hcell">'.&Apache::loncommon::plainname($cnum,$cdom).'</h2>');
-	$r->print('<blockquote>');
-	 if ($courseenv{'nickname'}) {
+ 	if ($target ne 'tex') {
+		$r->print('<div class="LC_ContentBoxSpecial">');
+		$r->print('<h2 class="LC_hcell">'.&Apache::loncommon::plainname($cnum,$cdom).'</h2>');
+		$r->print('<blockquote>');
+	 	if ($courseenv{'nickname'}) {
       	 	$r->print('<h2>&quot;'.$courseenv{'nickname'}.'&quot;</h2>');
     	}
-	$r->print('<h3>'.&Apache::lonnet::domain($cdom,'description').'</h3>');
- }
-else{
-	$r->print('\noindent{\large\textbf{'.&Apache::loncommon::plainname($cnum,$cdom).'}}\\\\\\\\');
-	$r->print('\textbf{'.&Apache::lonnet::domain($cdom,'description').'}\\\\');	
-}
+		$r->print('<h3>'.&Apache::lonnet::domain($cdom,'description').'</h3>');
+ 	}
+	else {
+		$r->print('\noindent{\large\textbf{'.&Apache::loncommon::plainname($cnum,$cdom).'}}\\\\\\\\');
+		$r->print('\textbf{'.&Apache::lonnet::domain($cdom,'description').'}\\\\');	
+	}
 # does this user have privileges to post, etc?
 
      
@@ -405,7 +405,8 @@
     if ($env{'request.course.id'}
 	&& &Apache::lonnet::allowed('srm',$env{'request.course.id'})
 	&& &in_course($cdom,$cnum)) {
-	if ($target ne 'tex') {	   
+	if ($target ne 'tex') {	  
+	   $r->print('<a name="coursecomment" />'; 
 	   &Apache::lontemplate::print_start_template($r,&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course'),'LC_ContentBoxSpecial');
 	   $r->print('<span class="LC_info">');
 	   $r->print(&mt('Shared by course faculty and staff').&Apache::loncommon::help_open_topic("Course_Face_To_Face_Records,Course_Critical_Message"));