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

[taceyjo1]

taceyjo1		Sat Sep 20 23:32:06 2003 EDT

  Modified files:              
    /loncom/publisher	lonconstruct.pm 
  Log:
  
  Added in the backend code to allow for the edit link (Bug: 2027)
  
  
Index: loncom/publisher/lonconstruct.pm
diff -u loncom/publisher/lonconstruct.pm:1.13 loncom/publisher/lonconstruct.pm:1.14
--- loncom/publisher/lonconstruct.pm:1.13	Mon Jun 16 17:32:43 2003
+++ loncom/publisher/lonconstruct.pm	Sat Sep 20 23:32:06 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construction Space Page Wrapper for Construction
 #
-# $Id: lonconstruct.pm,v 1.13 2003/06/16 21:32:43 www Exp $
+# $Id: lonconstruct.pm,v 1.14 2003/09/21 03:32:06 taceyjo1 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -114,6 +114,11 @@
         ($ENV{'QUERY_STRING'},['forceedit']);
    if ($ENV{'form.forceedit'}) {
        $lowerframe.='?editmode=Edit&problemmode=EditXML';
+   }	
+   &Apache::loncommon::get_unprocessed_cgi
+        ($ENV{'QUERY_STRING'},['forceColoredit']);
+   if ($ENV{'form.forceColoredit'}) {
+       $lowerframe.='?editmode=Edit&problemmode=Edit';
    }
 
    $r->print(<<ENDPAGE);