loncom/publisher/lonpubdir.pm - diff

Return to lonpubdir.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.147, 2013/07/02 19:04:49	version 1.148, 2013/07/27 21:38:54
Line 97 sub handler {	Line 97 sub handler {
opendir(DIR,$fn);	opendir(DIR,$fn);
my @files=sort {uc($a) cmp uc($b)} (readdir(DIR));	my @files=sort {uc($a) cmp uc($b)} (readdir(DIR));
foreach my $filename (@files) {	foreach my $filename (@files) {
	next if ($filename eq '.DS_Store');
my ($cdev,$cino,$cmode,$cnlink,	my ($cdev,$cino,$cmode,$cnlink,
$cuid,$cgid,$crdev,$csize,	$cuid,$cgid,$crdev,$csize,
$catime,$cmtime,$cctime,	$catime,$cmtime,$cctime,