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

Diff for /loncom/publisher/lonpublisher.pm between versions 1.297 and 1.298

version 1.297, 2016/06/19 04:27:57 version 1.298, 2021/06/03 13:59:44
Line 2277  sub publishdirectory { Line 2277  sub publishdirectory {
   &checkbox('forcerepub','force republication of previously published files').    &checkbox('forcerepub','force republication of previously published files').
                   &checkbox('obsolete','make file(s) obsolete').                    &checkbox('obsolete','make file(s) obsolete').
   &checkbox('forceoverride','force directory level metadata over existing').    &checkbox('forceoverride','force directory level metadata over existing').
                     &checkbox('excludeunpub','exclude currently unpublished files').
                   &common_access('dist',&mt('apply common copyright/distribution'),                    &common_access('dist',&mt('apply common copyright/distribution'),
                                  ['default','domain','custom']).                                   ['default','domain','custom']).
                   &common_access('source',&mt('apply common source availability'),                    &common_access('source',&mt('apply common source availability'),
Line 2309  sub publishdirectory { Line 2310  sub publishdirectory {
  }   }
     } elsif ((&Apache::loncommon::fileembstyle($extension) ne 'hdn') &&      } elsif ((&Apache::loncommon::fileembstyle($extension) ne 'hdn') &&
      ($filename!~/^[\#\.]/) && ($filename!~/\~$/)) {       ($filename!~/^[\#\.]/) && ($filename!~/\~$/)) {
 # find out publication status and/or exiting metadata  # find out publication status and/or existing metadata
  my $publishthis=0;   my $publishthis=0;
  if (-e $resdir.'/'.$filename) {   if (-e $resdir.'/'.$filename) {
     my ($rdev,$rino,$rmode,$rnlink,      my ($rdev,$rino,$rmode,$rnlink,
Line 2327  sub publishdirectory { Line 2328  sub publishdirectory {
     }      }
  } else {   } else {
 # never published  # never published
     $publishthis=1;      unless ($env{'form.excludeunpub'}) {
           $publishthis=1;
       }
  }   }
   
  if ($publishthis) {   if ($publishthis) {
Removed from v.1.297  
changed lines
  Added in v.1.298

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