::PackageRepository::probeForOpenPgpInstallation
      ::PackageRepository::openPgpMustBeInstalled

      #
      # NOTE: THIS BLOCK REFERS TO SEVERAL UNTESTED PROCEDURES.
      #
      if {0} then {
        stagePackageFiles $language $version $platform $fileNames
        stagePackageFiles \
            [string tolower $language] $version $platform $fileNames

        if {![commitPackageFiles \
            $package $patchLevel [string totitle $language] $version \
            $package $patchLevel $language $version checkin]} then {
            checkin]} then {
          error "failed to commit package files"
        }

        set script [createRepositoryScript \
            "" $checkin [string tolower $language] $version $platform \
            "" $checkin $language $version $platform $fileNames [list]]
            $fileNames [list]]

        set scriptFileName [file join \
            [::PackageRepository::getFileTempDirectory PKGR_UPLOAD_TEMP] \
            [appendArgs pkgr_upload_ [::PackageRepository::getUniqueSuffix]]]

        writeFile $scriptFileName $script

        if {![::PackageRepository::createOpenPgpSignature \
            $scriptFileName]} then {
          error [appendArgs \
              "cannot submit package metadata: OpenPGP signing of \"" \
              $scriptFileName "\" failed"]
        }

        set certificate [readFile [appendArgs $scriptFileName .asc]]

        submitPackageMetadata \
            $apiKey $package $patchLevel $language $script $certificate
            $apiKey $package $patchLevel [string totitle $language] \
            $script $certificate
      }
    } else {
      error "cannot initiate package submission: one or more fields missing"
    }
  }

  #