--- loncom/interface/lonsimplepage.pm	2009/06/08 18:04:45	1.83
+++ loncom/interface/lonsimplepage.pm	2009/06/11 16:48:33	1.84
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Simple Page Editor
 #
-# $Id: lonsimplepage.pm,v 1.83 2009/06/08 18:04:45 bisitz Exp $
+# $Id: lonsimplepage.pm,v 1.84 2009/06/11 16:48:33 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -182,7 +182,7 @@ sub handler {
             my $msg =
             &mt('You do not currently have rights to view this group.');
             if ($target ne 'tex') {
-                $r->print("<p>$msg</p>".
+                $r->print('<p class="LC_warning">'.$msg.'</p>'.
                 &Apache::loncommon::end_page());
             } else {
                 $r->print('\textbf{'.$msg.'}\end{document}');
@@ -253,37 +253,45 @@ sub handler {
         &Apache::lonnet::put($db_name,\%syllabus,$dom,$crs);
     }
 
-#---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')));
-        }
-    }
 #---Print Function
     if ($target ne 'tex') {
         if ($allowed || $privileged) {
-            $r->print(&Apache::lontemplate::start_functionslist());
+            my $functions=&Apache::lonhtmlcommon::start_funclist();
             if ($allowed) {
-                $r->print(&Apache::lontemplate::item_functionslist(
-                '<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Student View').'</a>'
-                .&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')));
+                $functions.=&Apache::lonhtmlcommon::add_item_funclist(
+                                '<a href="'.$r->uri.'?forcestudent=1">'
+                               .&mt('Show Student View').'</a>'
+                               .&Apache::loncommon::help_open_topic(
+                                    'Uploaded_Templates_PublicView'));
             } elsif ($privileged) {
                 my $edittext = &mt('Edit');
                     if ($group ne '') {
                     $edittext = &mt('Edit Group Homepage');
                 }
-                $r->print(&Apache::lontemplate::item_functionslist(
-                '<a href="'.$r->uri.'?forceedit=edit'.$refarg.'">'.$edittext.'</a>'));
+                $functions.=&Apache::lonhtmlcommon::add_item_funclist(
+                                '<a href="'.$r->uri.'?forceedit=edit'.$refarg.'">'
+                               .$edittext.'</a>');
                 if ($group ne '') {
                     if ($group_edit_perm) {
-                        $r->print(&Apache::lontemplate::item_functionslist(
-                        '<a href="/adm/coursegroups?action=modify&amp;refpage=grouplist'
-                        .'&amp;state=pick_task&amp;groupname='.$group.'">'
-                        .&mt('Edit Group Settings').'</a>'));
+                        $functions.=&Apache::lonhtmlcommon::add_item_funclist(
+                                        '<a href="/adm/coursegroups'
+                                       .'?action=modify&amp;refpage=grouplist'
+                                       .'&amp;state=pick_task&amp;groupname='
+                                       .$group.'">'
+                                       .&mt('Edit Group Settings')
+                                       .'</a>');
                        }
                     }
             }
-            $r->print(&Apache::lontemplate::end_functionslist());
+            $functions.=&Apache::lonhtmlcommon::end_funclist();
+            $r->print(&Apache::loncommon::head_subbox($functions));
+        }
+    }
+
+#---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')));
         }
     }
 
@@ -392,7 +400,12 @@ sub handler {
         if ($group ne '') {
             &display_group_links($r,$target,$group,'view',$refarg,%groupinfo);
         } else {
-            $r->print('<p>'.&mt('No page information provided.').'</p>');
+            my $text=&mt('No page information provided.');
+            if ($target ne 'tex') {
+                $r->print('<p class="LC_info">'.$text.'</p>');
+            } else {
+            $r->print($text)
+            }
         }
     }
     if ($env{'form.grade_target'} ne 'tex') {