[BACK]Return to lonpubmenu.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / publisher

Diff for /loncom/publisher/lonpubmenu.pm between versions 1.6 and 1.7

version 1.6, 2009/02/26 16:10:49 version 1.7, 2015/06/09 21:23:27
Line 34  use Apache::loncommon; Line 34  use Apache::loncommon;
   
 sub handler {  sub handler {
     my $r = shift;      my $r = shift;
     my %lt=&Apache::lonlocal::texthash(      my %js_lt=&Apache::lonlocal::texthash(
                                        cnpd => 'Cannot publish directory',                                         cnpd => 'Cannot publish directory',
                                        cnrd => 'Cannot retrieve directory',                                         cnrd => 'Cannot retrieve directory',
                                        mcdi => 'Must create new subdirectory inside a directory',                                         mcdi => 'Must create new subdirectory inside a directory',
                                         );
       &js_escape(\%js_lt);
       my %html_lt=&Apache::lonlocal::texthash(
                                        pubr => 'Publish this Resource',                                         pubr => 'Publish this Resource',
                                        pubd => 'Publish this Directory',                                         pubd => 'Publish this Directory',
                                        rtrv => 'Retrieve Old Version',                                         rtrv => 'Retrieve Old Version',
Line 63  sub handler { Line 66  sub handler {
                                        go => 'Go',                                         go => 'Go',
                                        prnt => 'Print'                                         prnt => 'Print'
                                       );                                        );
       &html_escape(\%html_lt);
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['disp']);      &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['disp']);
     my $disp = $env{'form.disp'};      my $disp = $env{'form.disp'};
 # set defaults for parent directory in case frameloc is unable to determine directory  # set defaults for parent directory in case frameloc is unable to determine directory
Line 121  function getactionfilename() { Line 125  function getactionfilename() {
       if ((document.fileaction.filename.value.charAt(        if ((document.fileaction.filename.value.charAt(
            document.fileaction.filename.value.length-1)!='/') &&             document.fileaction.filename.value.length-1)!='/') &&
            (document.fileaction.filename.value.indexOf('/adm/pubdir')==-1)) {             (document.fileaction.filename.value.indexOf('/adm/pubdir')==-1)) {
           alert('$lt{'mcdi'}');            alert('$js_lt{'mcdi'}');
           return;            return;
       }        }
    }     }
Line 208  function getfilename() { Line 212  function getfilename() {
       (document.publisher.filename.value.indexOf('/adm/pubdir')==-1)) {        (document.publisher.filename.value.indexOf('/adm/pubdir')==-1)) {
         document.publisher.submit();          document.publisher.submit();
     } else {      } else {
         alert('$lt{'cnpd'}');          alert('$js_lt{'cnpd'}');
     }      }
 }  }
   
Line 219  function getrfilename() { Line 223  function getrfilename() {
        (document.rpublisher.filename.value.indexOf('/adm/pubdir')==-1)) {         (document.rpublisher.filename.value.indexOf('/adm/pubdir')==-1)) {
         document.rpublisher.submit();          document.rpublisher.submit();
    } else {     } else {
       alert('$lt{'cnrd'}');        alert('$js_lt{'cnrd'}');
    }     }
 }  }
   
Line 245  END Line 249  END
                     <form name="publishdir" action="/adm/publish" target="_parent" method="post">                      <form name="publishdir" action="/adm/publish" target="_parent" method="post">
                       <input type="hidden" name="filename" value="" />                        <input type="hidden" name="filename" value="" />
                       <input type="hidden" name="forcerepub" value="NO" />                        <input type="hidden" name="forcerepub" value="NO" />
                       <input type="button" value="'.$lt{'pubd'}.'" onclick="getdirname();" />                        <input type="button" value="'.$html_lt{'pubd'}.'" onclick="getdirname();" />
                     </form>                      </form>
                  ');                   ');
     } else {      } else {
         $r->print('          $r->print('
                     <form name="publisher" action="/adm/publish" target="_parent" method="post">                      <form name="publisher" action="/adm/publish" target="_parent" method="post">
                       <input type="hidden" name="filename" value="" />                        <input type="hidden" name="filename" value="" />
               <input type="button" value="'.$lt{'pubr'}.'" onclick="getfilename();" />                <input type="button" value="'.$html_lt{'pubr'}.'" onclick="getfilename();" />
                     </form>                      </form>
                    ');                     ');
     }      }
Line 262  END Line 266  END
   <td bgcolor="#ccddaa" align="center">    <td bgcolor="#ccddaa" align="center">
     <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished" method="post">      <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished" method="post">
       <input type="hidden" name="filename" value="" />        <input type="hidden" name="filename" value="" />
       <input type="button" value="$lt{'list'}" onclick="getdfilename();" />        <input type="button" value="$html_lt{'list'}" onclick="getdfilename();" />
     </form>      </form>
   </td>    </td>
   <td bgcolor="#ccddaa" valign="top" align="center">    <td bgcolor="#ccddaa" valign="top" align="center">
Line 270  END Line 274  END
  method="post" enctype="multipart/form-data">   method="post" enctype="multipart/form-data">
       <input type="hidden" name="filename" value="" />        <input type="hidden" name="filename" value="" />
       <input type="file" name="upfile" size="20" />        <input type="file" name="upfile" size="20" />
       <input type="button" value="$lt{'uplo'}"  onclick="getufilename();" />        <input type="button" value="$html_lt{'uplo'}"  onclick="getufilename();" />
     </form>      </form>
   </td>    </td>
   <td rowspan="2" bgcolor="#ccddaa" align="center">    <td rowspan="2" bgcolor="#ccddaa" align="center">
Line 278  END Line 282  END
       <input type="hidden" name="postdata" value="" />        <input type="hidden" name="postdata" value="" />
       <input type="hidden" name="curseed" value="" />        <input type="hidden" name="curseed" value="" />
       <input type="hidden" name="problemtype" value="" />        <input type="hidden" name="problemtype" value="" />
       <input type="button" value="$lt{'prnt'}" onclick="getpostdata();" />        <input type="button" value="$html_lt{'prnt'}" onclick="getpostdata();" />
     </form>      </form>
   </td>    </td>
  </tr>   </tr>
Line 291  ENDTWO Line 295  ENDTWO
                       <input type="hidden" name="filename" value="" />                        <input type="hidden" name="filename" value="" />
                       <input type="hidden" name="forcerepub" value="NO" />                        <input type="hidden" name="forcerepub" value="NO" />
                       <input type="hidden" name="pubrec" value="1" />                        <input type="hidden" name="pubrec" value="1" />
                       <input type="button" value="$lt{'pubs'}" onclick="getsubdirname();" />                        <input type="button" value="$html_lt{'pubs'}" onclick="getsubdirname();" />
                     </form>                      </form>
                   </td>                    </td>
                   <td bgcolor="#ccddaa">                    <td bgcolor="#ccddaa">
                     <form name="editcat" action="/adm/cfile" target="_parent" method="post">                      <form name="editcat" action="/adm/cfile" target="_parent" method="post">
                       <input type="hidden" name="filename" value="" />                        <input type="hidden" name="filename" value="" />
                       <input type="button" value="$lt{'edit'}" onclick="geteditcat();" />                        <input type="button" value="$html_lt{'edit'}" onclick="geteditcat();" />
                     </form>                      </form>
                   </td>                    </td>
 ENDDIR  ENDDIR
Line 306  ENDDIR Line 310  ENDDIR
   <td bgcolor="#ccddaa" align="center">    <td bgcolor="#ccddaa" align="center">
     <form name="rpublisher" action="/adm/retrieve" target="_parent" method="post">      <form name="rpublisher" action="/adm/retrieve" target="_parent" method="post">
       <input type="hidden" name="filename" value="" />        <input type="hidden" name="filename" value="" />
       <input type="button" value="$lt{'rtrv'}" onclick="getrfilename();" />        <input type="button" value="$html_lt{'rtrv'}" onclick="getrfilename();" />
     </form>      </form>
   </td>    </td>
   <td bgcolor="#ccddaa">    <td bgcolor="#ccddaa">
     <form name="del" action="/adm/cfile" target="_parent" method="post">      <form name="del" action="/adm/cfile" target="_parent" method="post">
       <input type="hidden" name="filename" value="" />        <input type="hidden" name="filename" value="" />
       <input type="hidden" name="action" value="delete" />        <input type="hidden" name="action" value="delete" />
               <input type="button" value="$lt{'dele'}" onclick="getdelfilename();" />                <input type="button" value="$html_lt{'dele'}" onclick="getdelfilename();" />
     </form>      </form>
   </td>    </td>
 ENDFILE  ENDFILE
Line 324  ENDFILE Line 328  ENDFILE
       <nobr>        <nobr>
  <input type="hidden" name="filename" value="" />   <input type="hidden" name="filename" value="" />
   <select name="action">    <select name="action">
     <option value="Select Action">$lt{'sela'}</option>      <option value="Select Action">$html_lt{'sela'}</option>
     <option value="newfile">$lt{'nfil'}:</option>      <option value="newfile">$html_lt{'nfil'}:</option>
     <option value="newhtmlfile">$lt{'nhtm'}:</option>      <option value="newhtmlfile">$html_lt{'nhtm'}:</option>
     <option value="newproblemfile">$lt{'nprb'}:</option>      <option value="newproblemfile">$html_lt{'nprb'}:</option>
                             <option value="newpagefile">$lt{'npag'}:</option>                              <option value="newpagefile">$html_lt{'npag'}:</option>
                             <option value="newsequencefile">$lt{'nseq'}:</option>                              <option value="newsequencefile">$html_lt{'nseq'}:</option>
                             <option value="newrightsfile">$lt{'ncrf'}:</option>                              <option value="newrightsfile">$html_lt{'ncrf'}:</option>
                             <option value="newstyfile">$lt{'nsty'}:</option>                              <option value="newstyfile">$html_lt{'nsty'}:</option>
                             <option value="newlibraryfile">$lt{'nlib'}:</option>                              <option value="newlibraryfile">$html_lt{'nlib'}:</option>
     <option value="newdir">$lt{'nsub'}:</option>      <option value="newdir">$html_lt{'nsub'}:</option>
 ENDOPTIONS  ENDOPTIONS
     if ($disp ne 'dir') {      if ($disp ne 'dir') {
         $r->print(<<"ENDPROBOPS");          $r->print(<<"ENDPROBOPS");
     <option value="rename">$lt{'renm'}:</option>      <option value="rename">$html_lt{'renm'}:</option>
     <option value="move">$lt{'move'}:</option>      <option value="move">$html_lt{'move'}:</option>
     <option value="copy">$lt{'copy'}:</option>      <option value="copy">$html_lt{'copy'}:</option>
 ENDPROBOPS  ENDPROBOPS
     }      }
     $r->print(<<"ENDPAGE");      $r->print(<<"ENDPAGE");
   </select>&nbsp;<input type="text" name="newfilename" value="$lt{'type'}" onfocus="if (this.value == '$lt{'type'}') this.value=''" />&nbsp;<input type="button" value="$lt{'go'}" onclick="getactionfilename();" />    </select>&nbsp;<input type="text" name="newfilename" value="$html_lt{'type'}" onfocus="if (this.value == '$html_lt{'type'}') this.value=''" />&nbsp;<input type="button" value="$html_lt{'go'}" onclick="getactionfilename();" />
       </nobr>        </nobr>
     </form>      </form>
    </td>     </td>
Removed from v.1.6  
changed lines
  Added in v.1.7

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>