--- loncom/interface/lonmsgdisplay.pm	2006/04/08 06:53:37	1.1
+++ loncom/interface/lonmsgdisplay.pm	2006/04/22 17:03:43	1.3
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging display
 #
-# $Id: lonmsgdisplay.pm,v 1.1 2006/04/08 06:53:37 albertel Exp $
+# $Id: lonmsgdisplay.pm,v 1.3 2006/04/22 17:03:43 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -116,7 +116,6 @@ recipients of the message/e-mail.
 
 use strict;
 use Apache::lonnet;
-use vars qw($msgcount);
 use HTML::TokeParser();
 use Apache::Constants qw(:common);
 use Apache::loncommon();
@@ -173,7 +172,7 @@ sub scrollbuttons {
 
 sub statuschange {
     my ($msgid,$newstatus,$folder)=@_;
-    my $suffix=&foldersuffix($folder);
+    my $suffix=&Apache::lonmsg::foldersuffix($folder);
     my %status=&Apache::lonnet::get('email_status'.$suffix,[$msgid]);
     if ($status{$msgid}=~/^error\:/) { $status{$msgid}=''; }
     unless ($status{$msgid}) { $status{$msgid}='new'; }
@@ -205,8 +204,8 @@ sub makefolder {
 sub movemsg {
     my ($msgid,$srcfolder,$trgfolder)=@_;
     if ($srcfolder eq 'new') { $srcfolder=''; }
-    my $srcsuffix=&foldersuffix($srcfolder);
-    my $trgsuffix=&foldersuffix($trgfolder);
+    my $srcsuffix=&Apache::lonmsg::foldersuffix($srcfolder);
+    my $trgsuffix=&Apache::lonmsg::foldersuffix($trgfolder);
 
 # Copy message
     my %message=&Apache::lonnet::get('nohist_email'.$srcsuffix,[$msgid]);
@@ -1955,10 +1954,6 @@ sub handler {
 }
 # ================================================= Main program, reset counter
 
-BEGIN {
-    $msgcount=0;
-}
-
 =pod
 
 =back