[LON-CAPA-cvs] cvs: loncom /publisher testbankimport.pm

[raeburn]

raeburn		Mon Oct 31 01:25:32 2011 EDT

  Modified files:              
    /loncom/publisher	testbankimport.pm 
  Log:
  - loncacc::constructaccess() args changed in rev 1.55.
  
  
Index: loncom/publisher/testbankimport.pm
diff -u loncom/publisher/testbankimport.pm:1.31 loncom/publisher/testbankimport.pm:1.32
--- loncom/publisher/testbankimport.pm:1.31	Sun Oct 23 01:27:34 2011
+++ loncom/publisher/testbankimport.pm	Mon Oct 31 01:25:32 2011
@@ -1,5 +1,5 @@
 # Handler for parsing text upload problem descriptions into .problems
-# $Id: testbankimport.pm,v 1.31 2011/10/23 01:27:34 www Exp $
+# $Id: testbankimport.pm,v 1.32 2011/10/31 01:25:32 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1827,9 +1827,8 @@
             $env{'form.filename'};
     }
     ($uname,$udom)=
-        &Apache::loncacc::constructaccess($env{'form.filename'},
-                                          $r->dir_config('lonDefDomain'));
-    unless (($uname) && ($udom)) {
+        &Apache::loncacc::constructaccess($env{'form.filename'});
+    unless (($uname ne '') && ($udom ne '')) {
         $r->log_reason($uname.':'.$udom.' trying to convert testbank file '.
                        $env{'form.filename'}.' - not authorized',$r->filename);
         return HTTP_NOT_ACCEPTABLE;