.packageName <- "lumiMouseV1"
lumiMouseV1 <- function() {
	pkgInfo <- lumiMouseV1QC
	pkgInfo <- sub('\n\n$', '\n', pkgInfo)
	pkgInfo <- paste(pkgInfo, 'Mappings from Illumina Identifiers to nuIDs:\n', sep='')
	pkgInfo <- paste(pkgInfo, '\tlumiMouseV1PROBEID2NUID: from Illumina Probe Id to nuID\n', sep='')
	pkgInfo <- paste(pkgInfo, '\tlumiMouseV1TARGETID2NUID: from Illumina Target Id to nuID\n\n', sep='')
	cat(pkgInfo)
}
.no_S3_generics = TRUE
ns <- asNamespace("lumiMouseV1")
lumiMouseV1LOCUSIDfunc <- function() {
	lumiMouseV1LOCUSID <- function(){
		.Deprecated("lumiMouseV1ENTREZID")
	}
	lumiMouseV1LOCUSID()
	lumiMouseV1ENTREZID
}
makeActiveBinding("lumiMouseV1LOCUSID", lumiMouseV1LOCUSIDfunc, ns)

