[LON-CAPA-cvs] cvs: loncom /interface lonmsg.pm
matthew
lon-capa-cvs@mail.lon-capa.org
Tue, 06 Apr 2004 15:56:37 -0000
matthew Tue Apr 6 11:56:37 2004 EDT
Modified files:
/loncom/interface lonmsg.pm
Log:
Bug 2147 (email bug)
Index: loncom/interface/lonmsg.pm
diff -u loncom/interface/lonmsg.pm:1.96 loncom/interface/lonmsg.pm:1.97
--- loncom/interface/lonmsg.pm:1.96 Wed Mar 31 00:24:00 2004
+++ loncom/interface/lonmsg.pm Tue Apr 6 11:56:37 2004
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging
#
-# $Id: lonmsg.pm,v 1.96 2004/03/31 05:24:00 albertel Exp $
+# $Id: lonmsg.pm,v 1.97 2004/04/06 15:56:37 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -205,7 +205,7 @@
my $msg = new Mail::Send;
$msg->to($to);
$msg->subject('[LON-CAPA] '.$subject);
- if (my $fh = $msg->open('smtp',Server => 'localhost')) {
+ if (my $fh = $msg->open()) {
print $fh $body;
$fh->close;
}