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

[raeburn]

raeburn		Sat Jan 19 16:40:42 2008 EDT

  Modified files:              
    /loncom/interface	lonchat.pm 
  Log:
  - Missing &mt() 
  
  
Index: loncom/interface/lonchat.pm
diff -u loncom/interface/lonchat.pm:1.15 loncom/interface/lonchat.pm:1.16
--- loncom/interface/lonchat.pm:1.15	Mon Jul 17 12:10:57 2006
+++ loncom/interface/lonchat.pm	Sat Jan 19 16:40:41 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Chat
 #
-# $Id: lonchat.pm,v 1.15 2006/07/17 16:10:57 raeburn Exp $
+# $Id: lonchat.pm,v 1.16 2008/01/19 21:40:41 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -32,6 +32,7 @@
 use Apache::Constants qw(:common :http);
 use Apache::loncommon;
 use Apache::lonnet;
+use Apache::lonlocal;
 
 sub handler {
     my $r = shift;
@@ -68,13 +69,17 @@
 				       {'only_body'   => 1,
 					'add_entries' => \%loaditems,});
     my $end_page = &Apache::loncommon::end_page();
+    my %lt = &Apache::lonlocal::texthash(
+                                        anon => 'Post Anonymous',
+                                        post => 'Post',
+                                      );         
     $r->print(<<ENDDOCUMENT);
 $start_page
 <form method="post" name="chatentry">
 $latexHelp
 <input type="text" size="60" name="newchat">
-<input value="Post Anonymous" name="anonymous" type="submit">
-<input value="Post" name="newentry" type="submit">
+<input value="$lt{'anon'}" name="anonymous" type="submit">
+<input value="$lt{'post'}" name="newentry" type="submit">
 $group_elem
 </form>
 $end_page