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

[raeburn]

raeburn		Thu Oct  1 17:22:13 2009 EDT

  Modified files:              
    /loncom/interface	resetpw.pm 
  Log:
  - Better choice of default domain for multi-domain servers.
  
  
Index: loncom/interface/resetpw.pm
diff -u loncom/interface/resetpw.pm:1.18 loncom/interface/resetpw.pm:1.19
--- loncom/interface/resetpw.pm:1.18	Wed Sep 30 21:47:07 2009
+++ loncom/interface/resetpw.pm	Thu Oct  1 17:22:13 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Allow access to password changing via a token sent to user's e-mail. 
 #
-# $Id: resetpw.pm,v 1.18 2009/09/30 21:47:07 raeburn Exp $
+# $Id: resetpw.pm,v 1.19 2009/10/01 17:22:13 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -46,7 +46,7 @@
     my $contact_name = &mt('LON-CAPA helpdesk');
     my $contact_email =  $r->dir_config('lonSupportEMail');
     my $server = $r->dir_config('lonHostID');
-    my $defdom = $r->dir_config('lonDefDomain');
+    my $defdom = &Apache::lonnet::default_login_domain();
     &Apache::lonacc::get_posted_cgi($r);
     &Apache::lonlocal::get_language_handle($r);
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['token']);