[LON-CAPA-cvs] cvs: loncom /homework inputtags.pm /interface portfolio.pm rat lonpage.pm

[albertel]

albertel		Tue Jul 10 16:51:52 2007 EDT

  Modified files:              
    /rat	lonpage.pm 
    /loncom/interface	portfolio.pm 
    /loncom/homework	inputtags.pm 
  Log:
  - fix the use of Drop Box items in a .page
  
  
Index: rat/lonpage.pm
diff -u rat/lonpage.pm:1.83 rat/lonpage.pm:1.84
--- rat/lonpage.pm:1.83	Mon Jun 25 19:27:10 2007
+++ rat/lonpage.pm	Tue Jul 10 16:51:41 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.83 2007/06/25 23:27:10 albertel Exp $
+# $Id: lonpage.pm,v 1.84 2007/07/10 20:51:41 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -388,7 +388,7 @@
 								    'bgcolor'        => '#ffffff',}));
 # ------------------------------------------------------------------ Start form
 			  if ($nforms) {
-			      $r->print('<form method="post" action="'.
+			      $r->print('<form name="lonhomework" method="post" action="'.
 					&Apache::lonenc::check_encrypt($requrl)
 					.'">');
 			  }
Index: loncom/interface/portfolio.pm
diff -u loncom/interface/portfolio.pm:1.185 loncom/interface/portfolio.pm:1.186
--- loncom/interface/portfolio.pm:1.185	Thu Jun 21 16:25:18 2007
+++ loncom/interface/portfolio.pm	Tue Jul 10 16:51:46 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # portfolio browser
 #
-# $Id: portfolio.pm,v 1.185 2007/06/21 20:25:18 banghart Exp $
+# $Id: portfolio.pm,v 1.186 2007/07/10 20:51:46 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1728,7 +1728,8 @@
                     fileList = fileList + document.forms.checkselect.currentpath.value + document.forms.checkselect[i].value + "," ;
                 }
             }
-            opener.document.forms.lonhomework.$env{'form.fieldname'}.value=fileList;
+            var hwfield = opener.document.getElementsByName('$env{'form.fieldname'}');
+            hwfield[0].value = fileList;
             self.close();
         }
         </script>
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.226 loncom/homework/inputtags.pm:1.227
--- loncom/homework/inputtags.pm:1.226	Tue May 29 17:14:45 2007
+++ loncom/homework/inputtags.pm	Tue Jul 10 16:51:48 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.226 2007/05/29 21:14:45 albertel Exp $
+# $Id: inputtags.pm,v 1.227 2007/07/10 20:51:48 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -449,7 +449,7 @@
 	$result.='<br />'.'<strong>'.&mt('OR:').'</strong><br />';
     }
     if ($which eq 'portfolioonly' || $which eq 'both') { 
-	$result.=$extratext.'<a href='."'".'javascript:void(window.open("/adm/portfolio?mode=selectfile&amp;fieldname=HWPORT'.$jspart.'_'.$id.'","cat","height=600,width=800,scrollbars=1,resizable=1,menubar=2,location=1"))'."'".'>'.
+	$result.=$extratext.'<a href='."'".'javascript:void(window.open("/adm/portfolio?mode=selectfile&amp;fieldname='.$env{'form.request.prefix'}.'HWPORT'.$jspart.'_'.$id.'","cat","height=600,width=800,scrollbars=1,resizable=1,menubar=2,location=1"))'."'".'>'.
 	    &mt('Select Portfolio Files').'</a><br />'.
 	    '<input type="text" size="50" name="HWPORT'.$jspart.'_'.$id.'" value="" />'.
 	    '<br />';