#       designed to emit a message to the HTTP client log.  The string
  #       argument is the content of the message to emit.  If the string
  #       argument is an empty string, nothing is written.
  #
  proc pageLog { string } {
    if {[string length $string] > 0} then {
      catch {
        tclLog [appendArgs \
        tclLog [appendArgs [pid] " : " [clock seconds] " : http : " $string]
            [pid] " : " [clock seconds] " : http : " $string]
      }
    }
  }

  #
  # NOTE: This procedure was stolen from the "getEagle.tcl" script.  It is
  #       designed to emit a progress indicator while an HTTP request is

      set token [eval ::http::geturl [list $uri] $args]

      #
      # NOTE: Grab the HTTP response code and data now as they are needed
      #       in almost all cases.
      #
      set code [::http::ncode $token]; set data [::http::data $token]

      #
      # NOTE: If the HTTP response code is an empty string that may
      #       indicate a serious bug in the tls (or http) package for
      #       this platform.  So far, this issue has only been seen
      #       with the tls 1.6.1 package that shipped with macOS.
      #
      if {[string length $code] == 0} then {
        error [appendArgs \
            "received empty HTTP response code for URL \"" $uri \
            "\", the \"tls\" (and/or \"http\") package(s) may be " \
            "broken for this platform"]
      }

      #
      # NOTE: Check the HTTP response code, in order to follow any HTTP
      #       redirect responses.
      #
      switch -glob -- $code {
        100 -

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2
Comment: Eagle Package Repository

iQIcBAABCAAGBQJYnQBMAAoJEFAslq9JXcLZOawP/1t6T49Li8NuoysrqQyYNlpf
RvZvCIE7X9TaiFY01GFin/XXPyDbUFUL3WXfhtweitg2giGG0gai/5x4AQpVgd0l
WxoKfY9iTxiqEjz9SP6QuYuOPjw1ePzUWVOeSEJ5FYL3wAiq95NfiiEiRyfc9i8d
fF7B+hewtuLxhjsR2NpwYGa749SH4bcvgLTKEsqiIyFtx5iL34U+We7Afs/SC4jp
m9vzP5a3mUScrPIabm1epsHh/FKtEkExkCZjVZ7vxRer0/Ol/Vlj3Ce6AhHwmsTC
lNQDneLDNHl4Rr6OIkcTxGxhEEswcDx0Rtx8qrr+x6rtUxw8rxzDPpeuvFmx4gcO
WafktaRsaQHyDwm7LV33M/1s/kMYoL5aoP2IVuaurbIrlvGRL1krV+j6Gb4pv+1s
Cn7bjKmIDQUOHw4AfnMv/HedwVknplNRm1JtVkfVpqWRTXpFp/u2fVzEUMCsPhKB
3ZYnF+ScNcNLau+ujk8cs3jiyc4UGrEfOwFerzWegYMYPtFWH47Rh8UteHtVvO/Y
Awj0uL2b5+Yo54EXVBfUdcB5NtvMDOMJYOCoDZ87sDMugIy5OJWUNS+H9BRwYdXS
EgkBfuHMNA/lYNm+newYA4oUoxbkEUQv5ZD8hnnpn5/fDqjkwvr85vjYGSsSusHl
KeX1RwEd6TQd+i2+2oQ3
=2FFk
iQIcBAABCAAGBQJZUyBQAAoJEFAslq9JXcLZ4I8QAJpIEuvMdWeYrQlXutuLmLmW
DmhQUs7XvpCDkXm2ldyU+6X7LvH3M/QzqcvAfbBvRYhLtLqsD0Vo8g9km7PNkz8w
pBaVtI0af7C3Fa92vfJT9qnxVrHmhNIS4kQq7FWdEh/HOajsP9umXbD2dr/sLqfm
UZCKOi7kCS2JdbPTLw2AC3Sb5x/Jl5LTptjxjCrTj+fRyHTzg6xIxGgrN0/sdq7S
ATH14YuGfI4R11sTqWpoMI31wPn1XNkrXTbDSrgfAIlCGApauElWIjfGTRrsFZpA
buzgpwWwcWcRvE0AzeLONW6HVryXgKt6caAVQG2j/KnTCPeQ5Xo/g5yeEl+sU+96
MzGZweSHIG7N8BpZlqH1BQo6GNu+pQo90pPJlR0s2XT5NTIYPORKQBbAJs9+BWf7
SdJ7Fbzuh9sgN2ZbcHFo5ScHMPZJGrjbX2pSsuqVIZ+PCSHRp5NYzDZNMTwK/jFP
/Ln2taIKHwDpZYA2pH0zHMgyez8H9/guNMUmaRfZAF0A+gVfLNMTvUDE77ebeVQ1
uSMUxduqI9iwEwMC/bCZ0r6JRzC2AttGmxPgAdC4D/YgZhGGQs2a0cuyyJyESuYK
KmGR/uKs2pkeGGUPE4TF5rzchEL0aoZckzvqx5+vfFzefarDN9zs8ruEj3pLwquv
YaWsC2SK6589k/87lFY+
=9Nm0
-----END PGP SIGNATURE-----