--- loncom/publisher/lonpubdir.pm	2013/07/02 19:04:49	1.147
+++ loncom/publisher/lonpubdir.pm	2014/01/21 18:23:35	1.149
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Authoring Space Directory Lister
 #
-# $Id: lonpubdir.pm,v 1.147 2013/07/02 19:04:49 raeburn Exp $
+# $Id: lonpubdir.pm,v 1.149 2014/01/21 18:23:35 musolffc Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -46,7 +46,7 @@ sub handler {
 
   my $r=shift;
 
-  # Validate access to the construction space and get username@domain.
+  # Validate access to the construction space and get username:domain.
 
   my $uname;
   my $udom;
@@ -97,6 +97,7 @@ sub handler {
   opendir(DIR,$fn);
   my @files=sort {uc($a) cmp uc($b)} (readdir(DIR));
   foreach my $filename (@files) {
+     next if ($filename eq '.DS_Store');
      my ($cdev,$cino,$cmode,$cnlink,
          $cuid,$cgid,$crdev,$csize,
          $catime,$cmtime,$cctime,