Diff for /loncom/interface/londocs.pm between versions 1.510 and 1.516

version 1.510, 2012/11/27 23:34:41 version 1.516, 2012/12/02 18:44:04
Line 2434  $form_common.' Line 2434  $form_common.'
         if ($title) {          if ($title) {
             $url .= '&amp;title='.&HTML::Entities::encode($renametitle,'<>&"');              $url .= '&amp;title='.&HTML::Entities::encode($renametitle,'<>&"');
         }          }
         if ($orderidx) {          if ($isexternal && $orderidx) {
             $url .= '&amp;idx='.$orderidx;              $url .= '&amp;idx='.$orderidx;
         }          }
     }      }
Line 2451  $form_common.' Line 2451  $form_common.'
         my $fileloc =           my $fileloc = 
             &Apache::lonnet::declutter(&Apache::lonnet::filelocation('',$orig_url));              &Apache::lonnet::declutter(&Apache::lonnet::filelocation('',$orig_url));
         if ($isexternal) {          if ($isexternal) {
             $editlink =              $editlink = '&nbsp;'.
                 &Apache::lonextresedit::extedit_form(0,$residx,$orig_url,$title,$pathitem);                  &Apache::lonextresedit::extedit_form(0,$residx,$orig_url,$title,$pathitem);
         } else {          } elsif (!$isfolder && !$ispage) {
             my ($cfile,$home,$switchserver,$forceedit,$forceview) =               my ($cfile,$home,$switchserver,$forceedit,$forceview) = 
                 &Apache::lonnet::can_edit_resource($fileloc,$coursenum,$coursedom,$orig_url);                  &Apache::lonnet::can_edit_resource($fileloc,$coursenum,$coursedom,$orig_url);
             my $geteditlink;              if (($cfile ne '') && ($symb ne '' || $supplementalflag)) {
             if ($supplementalflag) {  
                 if ($orig_url eq "/adm/$env{'user.domain'}/$env{'user.name'}/aboutme") {  
                     $geteditlink = 1;  
                 }  
             } elsif (($cfile ne '') && ($symb ne '')) {  
                 $geteditlink = 1;  
             }  
             if ($geteditlink) {  
                 my $jscall =                   my $jscall = 
                     &Apache::lonhtmlcommon::jump_to_editres($cfile,$home,                      &Apache::lonhtmlcommon::jump_to_editres($cfile,$home,
                                                             $switchserver,                                                              $switchserver,
                                                             $forceedit,                                                              $forceedit,
                                                             undef,$symb);                                                              undef,$symb,
                                                               &escape($env{'form.folderpath'}),
                                                               $renametitle);
                 if ($jscall) {                  if ($jscall) {
                     $editlink = '&nbsp;<a class="LC_docs_ext_edit" href="javascript:'.                      $editlink = '&nbsp;<a class="LC_docs_ext_edit" href="javascript:'.
                                 $jscall.'" >'.&mt('Edit').'</a>';                                  $jscall.'" >'.&mt('Edit').'</a>';
Line 3298  sub handler { Line 3292  sub handler {
                if ($mapurl eq 'default') {                 if ($mapurl eq 'default') {
                    $maptitle = 'Main Course Documents';                     $maptitle = 'Main Course Documents';
                }                 }
                $path .= ($path ne '')? '&' : ''.                 $path .= (($path ne '')? '&' : '').
                     &Apache::lonhtmlcommon::entity_encode($mapurl).'&'.                      &Apache::lonhtmlcommon::entity_encode($mapurl).'&'.
                     &Apache::lonhtmlcommon::entity_encode($maptitle).                      &Apache::lonhtmlcommon::entity_encode($maptitle).
                     ':'.$mapresobj->randompick().                      ':'.$mapresobj->randompick().
Line 3602  sub handler { Line 3596  sub handler {
                 'prev' => 'Preview',                  'prev' => 'Preview',
                 'lnk'  => 'Add Link',                   'lnk'  => 'Add Link', 
                 'parse' => 'Upload embedded images/multimedia files if HTML file',                  'parse' => 'Upload embedded images/multimedia files if HTML file',
  'nd' => 'Upload Document',  
  'pm' => 'Published Map',  
  'sd' => 'Special Document',  
  'mo' => 'More Options',  
   );    );
 # -----------------------------------------------------------------------------  # -----------------------------------------------------------------------------
  my $fileupload=(<<FIUP);   my $fileupload=(<<FIUP);
Line 3629  CHBO Line 3619  CHBO
         <a class="LC_menubuttons_link" href="javascript:toggleUpload('ims');">          <a class="LC_menubuttons_link" href="javascript:toggleUpload('ims');">
         $lt{'imsf'}</a> $help{'Importing_IMS_Course'}          $lt{'imsf'}</a> $help{'Importing_IMS_Course'}
         <form name="uploadims" action="/adm/imsimportdocs" method="post" enctype="multipart/form-data" target="IMSimport">          <form name="uploadims" action="/adm/imsimportdocs" method="post" enctype="multipart/form-data" target="IMSimport">
         <fieldset id="uploadimsform" style="display: none;" />          <fieldset id="uploadimsform" style="display: none;">
         <legend>$lt{'imsf'}</legend>          <legend>$lt{'imsf'}</legend>
         $fileupload          $fileupload
         <br />          <br />
Line 3654  IMSFORM Line 3644  IMSFORM
         <a class="LC_menubuttons_link" href="javascript:toggleUpload('doc');">          <a class="LC_menubuttons_link" href="javascript:toggleUpload('doc');">
         $lt{'upfi'}</a> $help{'Uploading_From_Harddrive'}          $lt{'upfi'}</a> $help{'Uploading_From_Harddrive'}
         <form name="uploaddocument" action="/adm/coursedocs" method="post" enctype="multipart/form-data">          <form name="uploaddocument" action="/adm/coursedocs" method="post" enctype="multipart/form-data">
         <fieldset id="uploaddocform" style="display: none;" />          <fieldset id="uploaddocform" style="display: none;">
         <legend>$lt{'upfi'}</legend>          <legend>$lt{'upfi'}</legend>
  <input type="hidden" name="active" value="aa" />   <input type="hidden" name="active" value="aa" />
  $fileupload   $fileupload
Line 3674  IMSFORM Line 3664  IMSFORM
 FUFORM  FUFORM
   
  my $importpubform=(<<SEDFFORM);   my $importpubform=(<<SEDFFORM);
         <a class="LC_menubuttons_link" href="javascript:toggleMap();">          <a class="LC_menubuttons_link" href="javascript:toggleMap('map');">
         $lt{'impm'}</a>$help{'Load_Map'}          $lt{'impm'}</a>$help{'Load_Map'}
  <form action="/adm/coursedocs" method="post" name="mapimportform">   <form action="/adm/coursedocs" method="post" name="mapimportform">
         <fieldset id="importmapform" style="display: none;" />          <fieldset id="importmapform" style="display: none;">
         <legend>$lt{'impm'}</legend>          <legend>$lt{'impm'}</legend>
  <input type="hidden" name="active" value="bb" />   <input type="hidden" name="active" value="bb" />
         $lt{'copm'}<br />          $lt{'copm'}<br />
         <span class="LC_nobreak">          <span class="LC_nobreak">
         <input type="text" name="importmap" size="40" value=""           <input type="text" name="importmap" size="40" value="" 
         onfocus="this.blur();openbrowser('mapimportform','importmap','sequence,page','');" />          onfocus="this.blur();openbrowser('mapimportform','importmap','sequence,page','');" />
         &nbsp;<a href="javascript:openbrowser('mapimportform','importmap','sequence,page','');">$lt{'selm'}</a><br />          &nbsp;<a href="javascript:openbrowser('mapimportform','importmap','sequence,page','');">$lt{'selm'}</a></span><br />
         <input type="submit" name="loadmap" value="$lt{'load'}" />          <input type="submit" name="loadmap" value="$lt{'load'}" />
         </fieldset>          </fieldset>
         </form>          </form>
Line 3694  SEDFFORM Line 3684  SEDFFORM
  { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/src.png" alt="'.$lt{srch}.'"  onclick="javascript:groupsearch()" />' => $pathitem."<a class='LC_menubuttons_link' href='javascript:groupsearch()'>$lt{'srch'}</a>" },   { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/src.png" alt="'.$lt{srch}.'"  onclick="javascript:groupsearch()" />' => $pathitem."<a class='LC_menubuttons_link' href='javascript:groupsearch()'>$lt{'srch'}</a>" },
  { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/res.png" alt="'.$lt{impo}.'"  onclick="javascript:groupimport();"/>' => "<a class='LC_menubuttons_link' href='javascript:groupimport();'>$lt{'impo'}</a>$help{'Importing_LON-CAPA_Resource'}" },   { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/res.png" alt="'.$lt{impo}.'"  onclick="javascript:groupimport();"/>' => "<a class='LC_menubuttons_link' href='javascript:groupimport();'>$lt{'impo'}</a>$help{'Importing_LON-CAPA_Resource'}" },
  { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/wishlist.png" alt="'.$lt{lnks}.'" onclick="javascript:open_StoredLinks_Import();" />' => "<a class='LC_menubuttons_link' href='javascript:open_StoredLinks_Import();'>$lt{'lnks'}</a>" },   { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/wishlist.png" alt="'.$lt{lnks}.'" onclick="javascript:open_StoredLinks_Import();" />' => "<a class='LC_menubuttons_link' href='javascript:open_StoredLinks_Import();'>$lt{'lnks'}</a>" },
         { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/sequence.png" alt="'.$lt{impm}.'" onclick="javascript:toggleMap();" />' => $importpubform }          { '<img class="LC_noBorder LC_middle" src="/res/adm/pages/sequence.png" alt="'.$lt{impm}.'" onclick="javascript:toggleMap(\'map\');" />' => $importpubform }
  );   );
  $importpubform = &create_form_ul(&create_list_elements(@importpubforma));   $importpubform = &create_form_ul(&create_list_elements(@importpubforma));
         my $extresourcesform =          my $extresourcesform =
Line 3953  my %orderhash = ( Line 3943  my %orderhash = (
 unless ($env{'form.pagepath'}) {  unless ($env{'form.pagepath'}) {
     $orderhash{'00'} = ['Newfolder',$newfolderform];      $orderhash{'00'} = ['Newfolder',$newfolderform];
     $orderhash{'dd'} = ['Collaboration',$communityform];      $orderhash{'dd'} = ['Collaboration',$communityform];
     $orderhash{'ee'} = ['Special Documents',$specialdocumentsform];      $orderhash{'ee'} = ['Special Pages',$specialdocumentsform];
 }  }
   
  $hadchanges=0;   $hadchanges=0;
Line 3994  unless ($env{'form.pagepath'}) { Line 3984  unless ($env{'form.pagepath'}) {
         <a class="LC_menubuttons_link" href="javascript:toggleUpload('suppdoc');">          <a class="LC_menubuttons_link" href="javascript:toggleUpload('suppdoc');">
         $lt{'upfi'}</a> $help{'Uploading_From_Harddrive'}          $lt{'upfi'}</a> $help{'Uploading_From_Harddrive'}
  <form action="/adm/coursedocs" method="post" name="supuploaddocument" enctype="multipart/form-data">   <form action="/adm/coursedocs" method="post" name="supuploaddocument" enctype="multipart/form-data">
         <fieldset id="uploadsuppdocform" style="display: none;" />          <fieldset id="uploadsuppdocform" style="display: none;">
         <legend>$lt{'upfi'}</legend>          <legend>$lt{'upfi'}</legend>
  <input type="hidden" name="active" value="ee" />   <input type="hidden" name="active" value="ee" />
  $fileupload   $fileupload
Line 4057  my @specialdocs = ( Line 4047  my @specialdocs = (
             =>$supnewaboutmeform},              =>$supnewaboutmeform},
  );   );
 my @supimportdoc = (  my @supimportdoc = (
  {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/extres.png" alt="'.$lt{extr}.'" onclick="toggleUpload(\'suppext\')" />'   {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/extres.png" alt="'.$lt{extr}.'" onclick="javascript:toggleUpload(\'suppext\')" />'
             =>$supextform},              =>$supextform},
                 {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/pdfupload.png" alt="'.$lt{upl}.'" onclick="javascript:toggleUpload(\'suppdoc\');" />'                  {'<img class="LC_noBorder LC_middle" src="/res/adm/pages/pdfupload.png" alt="'.$lt{upl}.'" onclick="javascript:toggleUpload(\'suppdoc\');" />'
             =>$supupdocform},              =>$supupdocform},
Line 4067  $supupdocform =  &create_form_ul(&create Line 4057  $supupdocform =  &create_form_ul(&create
 my %suporderhash = (  my %suporderhash = (
  '00' => ['Supnewfolder', $supnewfolderform],   '00' => ['Supnewfolder', $supnewfolderform],
                 'ee' => ['Import Content',$supupdocform],                  'ee' => ['Import Content',$supupdocform],
                 'ff' => ['Special Documents',&create_form_ul(&create_list_elements(@specialdocs))]                  'ff' => ['Special Pages',&create_form_ul(&create_list_elements(@specialdocs))]
                 );                  );
         if ($supplementalflag) {          if ($supplementalflag) {
            my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$crstype,             my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$crstype,
Line 4351  sub generate_edit_table { Line 4341  sub generate_edit_table {
         $activetab = $env{'form.active'};          $activetab = $env{'form.active'};
     }      }
     my $backicon = $iconpath.'clickhere.gif';      my $backicon = $iconpath.'clickhere.gif';
     my $backtext = &mt('To Overview');      my $backtext = &mt('Exit');
     $form = '<div class="LC_Box" style="margin:0;">'.      $form = '<div class="LC_Box" style="margin:0;">'.
             '<ul id="navigation'.$tid.'" class="LC_TabContent">'."\n".              '<ul id="navigation'.$tid.'" class="LC_TabContent">'."\n".
             '<li class="goback">'.              '<li class="goback">'.
Line 4561  function toggleUpload(caller) { Line 4551  function toggleUpload(caller) {
     return;      return;
 }  }
   
 function toggleMap() {  function toggleMap(caller) {
     var disp = 'none';      var disp = 'none';
     if (document.getElementById('importmapform')) {      if (document.getElementById('importmapform')) {
         var curr = document.getElementById('importmapform').style.display;          if (caller == 'map') {
         if (curr == 'none') {              var curr = document.getElementById('importmapform').style.display;
             disp='block';              if (curr == 'none') {
                   disp='block';
               }
         }          }
         document.getElementById('importmapform').style.display=disp;          document.getElementById('importmapform').style.display=disp;
         resize_scrollbox('contentscroll','1','1');          resize_scrollbox('contentscroll','1','1');

Removed from v.1.510  
changed lines
  Added in v.1.516


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