ntry}) or
			exists($make_types{$class}))
			and @{$files}[0] ne '-'
			and ! exists($created_dbs{$entry})) {
			push @names, $entry;
			push @created_dbs, $entry;
			$created_dbs{$entry} = '';
			};
		};

	return @names;
	};

#