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

[albertel]

albertel		Sat Sep  2 16:47:15 2006 EDT

  Modified files:              
    /loncom/interface	lonannounce.pm 
  Log:
  <label>
  
  
Index: loncom/interface/lonannounce.pm
diff -u loncom/interface/lonannounce.pm:1.59 loncom/interface/lonannounce.pm:1.60
--- loncom/interface/lonannounce.pm:1.59	Mon Jul  3 11:30:52 2006
+++ loncom/interface/lonannounce.pm	Sat Sep  2 16:47:11 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Announce
 #
-# $Id: lonannounce.pm,v 1.59 2006/07/03 15:30:52 www Exp $
+# $Id: lonannounce.pm,v 1.60 2006/09/02 20:47:11 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -490,9 +490,9 @@
 # list servers
     foreach my $host (sort(keys(%Apache::lonnet::hostname))) {
 	if (&Apache::lonnet::allowed('psa',$Apache::lonnet::hostdom{$host})) {
-	    $r->print ('<br /><input type="checkbox" name="postto_'.$host.'" /> '.
+	    $r->print ('<br /><label><input type="checkbox" name="postto_'.$host.'" /> '.
 		       $host.' <tt>'.$Apache::lonnet::hostname{$host}.'</tt> '.
-		       '<a href="http://'.$Apache::lonnet::hostname{$host}.
+		       '</label><a href="http://'.$Apache::lonnet::hostname{$host}.
 		       '/announcement.txt" target="annowin">current</a>');
 	}
     }