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

www lon-capa-cvs@mail.lon-capa.org
Fri, 01 Aug 2003 18:06:33 -0000


www		Fri Aug  1 14:06:33 2003 EDT

  Modified files:              
    /loncom/publisher	loncfile.pm publisher.html 
  Log:
  Create style and rights files.
  
  
Index: loncom/publisher/loncfile.pm
diff -u loncom/publisher/loncfile.pm:1.33 loncom/publisher/loncfile.pm:1.34
--- loncom/publisher/loncfile.pm:1.33	Fri Jun 20 11:30:13 2003
+++ loncom/publisher/loncfile.pm	Fri Aug  1 14:06:33 2003
@@ -9,7 +9,7 @@
 #  and displays a page showing the results of the action.
 #
 #
-# $Id: loncfile.pm,v 1.33 2003/06/20 15:30:13 www Exp $
+# $Id: loncfile.pm,v 1.34 2003/08/01 18:06:33 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -879,6 +879,8 @@
 	    $ENV{'form.action'} eq 'newproblemfile' ||
             $ENV{'form.action'} eq 'newpagefile' ||
             $ENV{'form.action'} eq 'newsequencefile' ||
+            $ENV{'form.action'} eq 'newrightsfile' ||
+            $ENV{'form.action'} eq 'newstyfile' ||
             $ENV{'form.action'} eq 'Select Action') {
       if($ENV{'form.newfilename'}) {
 	  my $newfilename = $ENV{'form.newfilename'};
@@ -1309,6 +1311,8 @@
 	   $ENV{'form.action'} eq 'newproblemfile' ||
            $ENV{'form.action'} eq 'newpagefile' ||
            $ENV{'form.action'} eq 'newsequencefile' ||
+	   $ENV{'form.action'} eq 'newrightsfile' ||
+	   $ENV{'form.action'} eq 'newstyfile' ||
            $ENV{'form.action'} eq 'Select Action' ) {
       $r->print('<h3>New Resource</h3>');
   } else {
Index: loncom/publisher/publisher.html
diff -u loncom/publisher/publisher.html:1.29 loncom/publisher/publisher.html:1.30
--- loncom/publisher/publisher.html:1.29	Sun Jun 15 14:02:57 2003
+++ loncom/publisher/publisher.html	Fri Aug  1 14:06:33 2003
@@ -132,6 +132,8 @@
 			    <option value="newproblemfile">New problem:</option>
                             <option value="newpagefile">New assembled page:</option>
                             <option value="newsequencefile">New assembled sequence:</option>
+                            <option value="newrightsfile">New custom rights file:</option>
+                            <option value="newstyfile">New style file:</option>
 			    <option value="newdir">New subdirectory:</option>
 			    <option value="rename">Rename current file to:</option>
 			    <option value="copy">Copy current file to:</option>