set code [::PackageRepository::getLookupCodeFromData $data]
    set result [::PackageRepository::getLookupResultFromData $data]

    if {[::PackageRepository::isLookupCodeOk $code]} then {
      return $result
    } else {
      error [appendArgs \
          "failed to submit package metadata: " $result]
    }
  }

  #
  # NOTE: This procedure attempts to query the root directory of the Fossil
  #       checkout.  There are no arguments.  An empty string is returned if
  #       the root directory of the Fossil checkout cannot be determined.