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

raeburn raeburn at source.lon-capa.org
Sun Feb 2 19:08:31 EST 2025


raeburn		Mon Feb  3 00:08:31 2025 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  - LON-CAPA 1.2 and later display speech bubble icons for all items with 
    discussion posts until marked as read, unlike 1.1 and earlier which would
    display "new" posts added since last "logout" from course or from LON-CAPA.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.568 loncom/interface/lonnavmaps.pm:1.569
--- loncom/interface/lonnavmaps.pm:1.568	Fri Jan 31 16:07:31 2025
+++ loncom/interface/lonnavmaps.pm	Mon Feb  3 00:08:31 2025
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.568 2025/01/31 16:07:31 raeburn Exp $
+# $Id: lonnavmaps.pm,v 1.569 2025/02/03 00:08:31 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1594,27 +1594,18 @@
     my $printKey = $args->{'printKey'};
     my $printCloseAll = $args->{'printCloseAll'};
     if (!defined($printCloseAll)) { $printCloseAll = 1; }
-   
+
     # Print key?
     if ($printKey) {
-        $result .= '<table border="0" cellpadding="2" cellspacing="0">';
-        $result.='<tr><td align="right" valign="bottom">Key:  </td>';
-	my $location=&Apache::loncommon::lonhttpdurl("/adm/lonMisc");
-        if ($navmap->{LAST_CHECK}) {
-            $result .= 
-                '<img src="'.$location.'/chat.gif" alt="" /> '.&mt('New discussion since').' '.
-                strftime("%A, %b %e at %I:%M %P", localtime($navmap->{LAST_CHECK})).
-                '</td><td align="center" valign="bottom">  '.
-                '<img src="'.$location.'/feedback.gif" alt="" /> '.&mt('New message (click to open)').'<p>'.
-                '</td>'; 
-        } else {
-            $result .= '<td align="center" valign="bottom">  '.
-                '<img src="'.$location.'/chat.gif" alt="" /> '.&mt('Discussions').'</td><td align="center" valign="bottom">'.
-                '  <img src="'.$location.'/feedback.gif" alt="" /> '.&mt('New message (click to open)').
-                '</td>'; 
-        }
-
-        $result .= '</tr></table>';
+        my $location = &Apache::loncommon::lonhttpdurl("/adm/lonMisc");
+        $result .= '<table border="0" cellpadding="2" cellspacing="0">'.
+                   '<tr><td align="right" valign="bottom">Key:  </td>'.
+                   '<td align="center" valign="bottom">  '.
+                   '<img src="'.$location.'/chat.gif" alt="" /> '.&mt('Unread Discussion').
+                   '</td><td align="center" valign="bottom">'.
+                   '  <img src="'.$location.'/feedback.gif" alt="" /> '.
+                   &mt('New message (click to open)').
+                   '</td></tr></table>'."\n";
     }
 
     if ($printCloseAll && !$args->{'resource_no_folder_link'}) {




More information about the LON-CAPA-cvs mailing list