Rework API to be around name, uuid rather than unexported Base.PkgId

Author: timholy

Project.toml

@@ -3,8 +3,12 @@ uuid = "da1fd8a2-8d9e-5ec2-8556-3022fb5608a2"
 authors = ["Tim Holy <[email protected]>"]
 version = "0.1.0"
 
+[deps]
+UUIDs = "cf7118a7-6976-5b1a-9a39-7adc72f591a4"
+
 [extras]
+ColorTypes = "3da002f7-5984-5a60-b8a6-cbb66c0b333f"
 Test = "8dfed614-e22c-5e08-85e1-65c5234f0b40"
 
 [targets]
-test = ["Test"]
+test = ["Test", "ColorTypes"]

src/CodeTracking.jl

@@ -2,6 +2,7 @@ module CodeTracking
 
 using Base: PkgId
 using Core: LineInfoNode
+using UUIDs
 
 export PkgFiles
 export whereis, definition, pkgfiles
@@ -81,11 +82,20 @@ end
 definition(method::Method) = definition(method, Expr)
 
 """
-    info = pkgfiles(id::PkgId)
+    info = pkgfiles(name::AbstractString)
+    info = pkgfiles(name::AbstractString, uuid::UUID)
 
-Return a [`PkgFiles`](@ref) structure with information about the files that define package `id`.
-Returns `nothing` if `id` has not been loaded.
+Return a [`PkgFiles`](@ref) structure with information about the files that define the package
+specified by `name` and `uuid`.
+Returns `nothing` if this package has not been loaded.
 """
+pkgfiles(name::AbstractString, uuid::UUID) = pkgfiles(PkgId(uuid, name))
+function pkgfiles(name::AbstractString)
+    project = Base.active_project()
+    uuid = Base.project_deps_get(project, name)
+    uuid == false && error("no package ", name, " recognized")
+    return pkgfiles(name, uuid)
+end
 pkgfiles(id::PkgId) = get(_pkgfiles, id, nothing)
 
 """

test/runtests.jl

@@ -1,5 +1,6 @@
 using CodeTracking
 using Test
+# Note: ColorTypes needs to be installed, but note the absence of `using`
 
 include("script.jl")
 
@@ -28,4 +29,7 @@ include("script.jl")
     show(io, info)
     str = String(take!(io))
     @test startswith(str, "PkgFiles(CodeTracking [da1fd8a2-8d9e-5ec2-8556-3022fb5608a2]):\n  basedir:")
+
+    @test pkgfiles("ColorTypes") === nothing
+    @test_throws ErrorException pkgfiles("NotAPkg")
 end