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

[raeburn]

raeburn		Wed Mar 29 15:07:01 2006 EDT

  Modified files:              
    /loncom/interface	lonsimplepage.pm lonmenu.pm 
  Log:
  Changes to function links on group page. Also, adding a javascript function to lonmenu to open a group chat window (called from Group chat link on group page).
  
  
Index: loncom/interface/lonsimplepage.pm
diff -u loncom/interface/lonsimplepage.pm:1.35 loncom/interface/lonsimplepage.pm:1.36
--- loncom/interface/lonsimplepage.pm:1.35	Thu Mar 23 17:32:11 2006
+++ loncom/interface/lonsimplepage.pm	Wed Mar 29 15:07:00 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Simple Page Editor
 #
-# $Id: lonsimplepage.pm,v 1.35 2006/03/23 22:32:11 albertel Exp $
+# $Id: lonsimplepage.pm,v 1.36 2006/03/29 20:07:00 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -313,7 +313,7 @@
     my %menu = ();
     %{$menu{'email'}} = (
                         text => 'Group e-mail',
-                        href => '/adm/email?group='.$marker,
+                        href => '/adm/email?compose=group&group='.$marker,
                       );
     %{$menu{'discussion'}} = (
                         text => 'Discussion Boards',
@@ -325,7 +325,7 @@
                       );
     %{$menu{'files'}} = (
                         text => 'File repository',
-                        href => '/adm/portfolio?group='.$marker,
+                        href => '/adm/coursegrp_portfolio?group='.$marker,
                       );
     %{$menu{'roster'}} = (
                         text => 'Membership roster',
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.168 loncom/interface/lonmenu.pm:1.169
--- loncom/interface/lonmenu.pm:1.168	Tue Mar 28 15:11:52 2006
+++ loncom/interface/lonmenu.pm	Wed Mar 29 15:07:00 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.168 2006/03/28 20:11:52 albertel Exp $
+# $Id: lonmenu.pm,v 1.169 2006/03/29 20:07:00 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1177,6 +1177,12 @@
 function chat_win() {
    lonchat=window.open('/res/adm/pages/chatroom.html',"LONchat",'height=320,width=280,resizable=yes,location=no,menubar=no,toolbar=no');
 }
+
+function group_chat(group) {
+   var url = '/adm/groupchat?group='+group;
+   var winName = 'LONchat_'+group;
+   grpchat=window.open(url,winName,'height=320,width=280,resizable=yes,location=no,menubar=no,toolbar=no');
+}
 ENDUTILITY
 }