--- loncom/interface/lonmsg.pm 2004/12/11 14:09:46 1.122
+++ loncom/interface/lonmsg.pm 2004/12/15 01:17:09 1.124
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging
#
-# $Id: lonmsg.pm,v 1.122 2004/12/11 14:09:46 raeburn Exp $
+# $Id: lonmsg.pm,v 1.124 2004/12/15 01:17:09 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -537,7 +537,9 @@ sub folderlist {
sub scrollbuttons {
my ($start,$maxdis,$first,$finish,$total)=@_;
+ unless ($total>0) { return ''; }
$start++; $maxdis++;$first++;$finish++;
+ return
''.
''.
' of '.$maxdis.
@@ -697,7 +699,6 @@ sub discrit {
foreach (sort keys %what) {
my %content=&unpackagemsg($what{$_});
next if ($content{'senderdomain'} eq '');
- $content{'message'}=~s/\n/\
/g;
$result.='