incr counter
      }
    }
  }

  #
  # NOTE: This procedure attempts to check for the configured installation of
  #       OpenPGP.  There are no arguments.  Non-zero is returned if OpenPGP
  #       appears to be installed.
  # NOTE: This procedure attempts to check for an OpenPGP installation being
  #       installed at the default location.  There are no arguments.  If the
  #       OpenPGP installation is detected and is not yet present in the PATH,
  #       an attempt will be made to add it.  Non-zero will be returned if the
  #       OpenPGP installation directory was successfully detected and added
  #       to the PATH -OR- detecting and adding it was not necessary because
  #       it already appeared to be available for use.
  #
  # <public>
  # <internal>
  proc probeForOpenPgpInstallation {} {
    global env
    variable openPgpInstalledDirectory
    variable openPgpInstalledFileName

    if {[catch {openPgpMustBeInstalled}] == 0} then {
      return true