--- loncom/lond 2007/03/01 17:51:44 1.361 +++ loncom/lond 2007/03/12 22:24:58 1.362 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.361 2007/03/01 17:51:44 raeburn Exp $ +# $Id: lond,v 1.362 2007/03/12 22:24:58 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -59,7 +59,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.361 $'; #' stupid emacs +my $VERSION='$Revision: 1.362 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -1268,6 +1268,7 @@ sub du_handler { my $code=sub { if ($_=~/\.\d+\./) { return;} if ($_=~/\.meta$/) { return;} + if (-d $_) { return;} $total_size+=(stat($_))[7]; }; chdir($ududir);