{
    # process all information-bay directories

    my %accounts;
    tie %accounts, 'esmith::config', '/home/e-smith/accounts';

    $OUT .= "";

    foreach my $key (keys %accounts)
    {
	my ($type,%properties) = db_get(\%accounts, $key);
	next unless ($type eq 'ibay');

	#------------------------------------------
	# If public access is set to none, then force the share
	# to go directly to the files subdirectory for Mac. filesharing
	# Otherwise, have the share show all 3 subfolders to give
	# html content
	#------------------------------------------

	$OUT .= "# $properties{'Name'}\n";
	$OUT .= "/home/e-smith/files/ibays/$key";
	if ($properties {'PublicAccess'} && 
		($properties {'PublicAccess'} eq 'none'))
	{
	    $OUT .= "/files";
	}
        $OUT .= "\t\"$key\"\n";
    }
}
