#
  proc setupPackageUnknownVars {} {
    #
    # NOTE: Should the HTTP request processor attempt to force the use of
    #       HTTPS for URIs that were originally HTTP?  This setting is only
    #       applicable to native Tcl.
    #
    variable forceSecureUri; # DEFAULT: true

    if {![info exists forceSecureUri]} then {
      set forceSecureUri true
    }

    #
    # NOTE: Is this HTTP request processor allowed to use plain HTTP if/when
    #       the "tls" package is not available?  This should only be changed
    #       if the "tls" package cannot be easily installed for use with the
    #       native Tcl interpreter in use.  It should be noted here that the
    #       official package repository server reserves the right to refuse
    #       plain HTTP connections, which means that changing this setting
    #       may be totally pointless.
    #
    variable allowInsecureUri; # DEFAULT: false

    if {![info exists allowInsecureUri]} then {
      set allowInsecureUri false
    }

    #
    # NOTE: Is this HTTP request processor allowed to use plain HTTP if/when
    #       the server responds with an HTTP redirect location to an original
    #       URI that was HTTPS?  Otherwise, a script error will result.
    #
    variable allowInsecureRedirect; # DEFAULT: false

    if {![info exists allowInsecureRedirect]} then {
      set allowInsecureRedirect false
    }

    #
    # NOTE: What is the default set of API keys if none were set explicitly?
    #       This list is subject to change at any time -AND- may be empty or
    #       may contain non-working API keys, please do not rely on it.
    #

      }
    }

    #
    # NOTE: This procedure was stolen from the "getEagle.tcl" script.  It is
    #       designed to process a single HTTP request, including any HTTP
    #       3XX redirects (up to the specified limit), and return the raw
    #       HTTP response data.  It may raise any number of script errors.

    #
    # <public>
    proc getFileViaHttp { uri redirectLimit channel quiet args } {
      #
      # NOTE: This variable is used to determine if plain HTTP URIs should be
      #       converted to HTTPS, if the "tls" package is available.
      #
      variable forceSecureUri

      #
      # NOTE: This variable is used to determine if plain HTTP is allowed if
      #       the "tls" package is not available.
      #
      variable allowInsecureUri

      #
      # NOTE: This variable is used to determine if plain HTTP is allowed if
      #       an HTTP redirect response contains an HTTP URI and the original
      #       URI was HTTPS.
      #
      variable allowInsecureRedirect

      #
      # NOTE: This variable is used to keep track of the currently scheduled
      #       (i.e. pending) [after] event.
      #
      variable afterForPageProgress

      #
      # NOTE: This procedure requires the modern version of the HTTP package,
      #       which is typically included with the Tcl core distribution.
      #
      package require http 2.0

      #
      # NOTE: If the 'tls' package is available, always attempt to use HTTPS;
      #       otherwise, only attempt to use HTTP if explicitly allowed.
      #
      if {[catch {package require tls}] == 0} then {
        ::http::register https 443 [list ::tls::socket -tls1 true]

        if {$forceSecureUri} then {
          if {[string range $uri 0 6] eq "http://"} then {
            set uri [appendArgs https:// [string range $uri 7 end]]
          }
        }
      } else {
        if {$allowInsecureUri} then {
          if {[string range $uri 0 7] eq "https://"} then {
            set uri [appendArgs http:// [string range $uri 8 end]]
          }
        }
      }

      #
      # NOTE: Unless the caller forbids it, display progress messages during
      #       the download.
      #

      while {1} {
        #
        # NOTE: Issue the HTTP request now, grabbing the resulting token.
        #
        set token [eval [list ::http::geturl $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: Check the HTTP response code, in order to follow any HTTP
        #       redirect responses.
        #
        switch -glob -- $code {
          100 -
          101 -
          102 {
            ::http::cleanup $token; error [appendArgs \
                "unsupported informational HTTP response status code " \
                $code ", data: " $data]
          }
          200 -
          201 -
          202 -
          203 -
          204 -
          205 -
          206 -
          207 -
          208 -
          226 {
            #
            # NOTE: Ok, the HTTP response is actual data of some kind (which
            #       may be empty).
            #
            ::http::cleanup $token; break
          }
          301 -
          302 -
          303 -
          307 -
          308 {
            #
            # NOTE: Unless the caller forbids it, display progress messages
            #       when an HTTP redirect is returned.
            #
            if {!$quiet} then {
              pageProgress $channel > 0
            }

            #
            # NOTE: We hit another HTTP redirect.  Stop if there are more
            #       than X.
            #
            incr redirectCount

            #
            # TODO: Maybe make this limit more configurable?
            #
            if {$redirectCount > $redirectLimit} then {
              #
              # NOTE: Just "give up" and raise a script error.

              #

              ::http::cleanup $token; error [appendArgs \
                  "redirection limit of " $redirectLimit " exceeded"]
            }

            #
            # NOTE: Grab the metadata associated with this HTTP response.
            #
            array set meta [::http::meta $token]

            #
            # NOTE: Is there actually a new URI (location) to use?
            #
            if {[info exist meta(Location)]} then {
              #
              # NOTE: Ok, grab it now.  Later, at the top of the loop,
              #       it will be used in the subsequent HTTP request.
              #
              set location $meta(Location); unset meta

              #
              # NOTE: For security, by default, do NOT follow an HTTP
              #       redirect if it attempts to redirect from HTTPS
              #       to HTTP.
              #
              if {!$allowInsecureRedirect && \
                  [string range $uri 0 7] eq "https://" && \
                  [string range $location 0 7] ne "https://"} then {
                #
                # NOTE: Just "give up" and raise a script error.

                #

                ::http::cleanup $token; error [appendArgs \
                    "refused insecure redirect from \"" $uri "\" to \"" \
                    $location \"]
              }

              #
              # NOTE: Replace the original URI with the new one, for
              #       use in the next HTTP request.
              #
              set uri $location

              #
              # NOTE: Cleanup the current HTTP token now beause a new
              #       one will be created for the next request.
              #
              ::http::cleanup $token
            } else {
              #
              # NOTE: Just "give up" and raise a script error.

              #
              ::http::cleanup $token; error [appendArgs \
                  "redirect from \"" $uri "\" missing location, code " \
                  $code ", data: " $data]
            }
          }
          304 -
          305 -
          306 {
            ::http::cleanup $token; error [appendArgs \
                "unsupported redirection HTTP response status code " $code \
                ", data: " $data]
          }
          4?? {
            ::http::cleanup $token; error [appendArgs \
                "client error HTTP response status code " $code ", data: " \
                $data]
          }
          5?? {
            ::http::cleanup $token; error [appendArgs \
                "server error HTTP response status code " $code ", data: " \
                $data]
          }
          default {






            ::http::cleanup $token; error [appendArgs \
                "unrecognized HTTP response status code " $code ", data: " \
                $data]
          }
        }
      }

      #
      # NOTE: If there is a currently scheduled [after] event, cancel it.
      #

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

iQIcBAABCAAGBQJX3gq5AAoJEFAslq9JXcLZ4kYP/i7cwkZGs0fSCnG9hlcHsF1R
2RQLxSxMKvslZC8wG7kjBEl4kEFornaKEvrBcNi4cH62kixU7kaXai40bhTDdRfx
wCovFa3Ie+ES/+uEBSeA7Ju7bn3l8tWaktwSqqwEhCgiW4eXFUWLgqqMZmxVn2Yb
aBk07FKci+vfFm5akZ23pVzz8IUCzh2y6AavFgE/0xkIibFrUQNn8yc4dAqM1VrB
2gZ7rvkrzF10sNGzmK5cb/F6owN9Cq4A7Rr+hsixh3KUF2Smws8tQuOEHlDa17ln
98n35Gbp34JqTaXwyUBgAWtel4SvQc36SXQoG7jH5hLtMnlhyAVnZPiiB8TgfJUU
GpQPxhd4dhLkMeg8u55ZlRbzlAcClBsQyxkzFjk7rKe0Y82ZnAPWioqtMgj0LjNG
EOLPdJG+v7wJD/yfpvkNiBbwq2DTZq5V4uDub95RS+Ck3QxX5MF8LlIX9D6v7f/O
QznTyMChbM6A4E96NLsFEHcqz85GXtSwMqez3rfX+wRlSFKXNxqYUFXFpVOWoTrS
jVrs/xeLBStdGK/a5W8vhEWuyF8SrOIXBxPO1Tn/Yzjp1sY18JCvJYckC2962+7m
ZD0nJS8KE6L5jrTA53iXU+0OVvjdhYzaMVcbKy9l/UUxo2YThdGaqah+42Ezoo56
kDLy5eoJLZ7XfE9kP40B
=tpBZ
-----END PGP SIGNATURE-----

    THE ASSOCIATED SOFTWARE MAY NOT WORK PROPERLY IF THIS FILE IS ALTERED.
-->
<Certificate xmlns="https://eagle.to/2011/harpy"
             xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
             xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <Protocol>None</Protocol>
  <Vendor>Mistachkin Systems</Vendor>
  <Id>4eac20d8-450e-4bf5-80ce-3d7e3cdd6bdf</Id>
  <HashAlgorithm>SHA512</HashAlgorithm>
  <EntityType>Script</EntityType>
  <TimeStamp>2016-09-18T03:31:28.6953125Z</TimeStamp>
  <Duration>-1.00:00:00</Duration>
  <Key>0x9559f6017247e3e2</Key>
  <Signature>
    fOsyQrGCTEiM/7pYRKzObjASFHD24S1+Lxkb/VjwrJ4OH5zQV3swwPHgw7GjRFmsC+Tlp6J5/YMB
    75m9ZMO1OjPp7VNRDKPupmcxZ650zciiTbA8ZdOE6qkyrxfK+xIZVrv1WZfdRvf5VDinpeFXb+I0
    fH+m6TwkDnOK713yoLvZ38YWQoJtOOsYHfESEdlEHk1e5CWa4SagGwmFf/wuQXN0J0ECTMYKhuVJ
    gXegileFuiPIYyu6zun++bC1zly6fbSlCZ+hE6/R6hnLnh7XEY1+2UGaO/rHbY8amRsoYhib0SHR
    2ygGvg0zEmLdCdLGper8RBjsRPGZ6q0pNuhOh+nlKRl3K85jeqVjBly8gQYXSDKSJ4WrB4CN+CvM
    Dr74OGrOA8JALsSbNkyO3VV506bPn+Y2BV/jzsb5pUNCMFhiflBy2Fx+tW2n8s66QPHUq1qCroZX
    +nK/243W6j7BW8KnE3+fJGUe/KMvnc7kdmf6Ew9uQwIIp9v+7OQjsr3gvGjur4mjlzm2Tudggzbk
    O9Eldv0mQRpjWnu3WjBWmhav9dH5Zq0Ww5EKWF/Go82rY5XEZir+qvw359xZAaVNmkSerSwwTDxZ
    PDPs1YrmLFBfPb075TsWKgJ1emb2ke/kduSKQxUuEwl0XGPPTaXH80Vvhvgm9dWv/KNNbWSnX/Nk
    gCpTwZIs8QVa85t1A8tpkQ9CsTWctlEfpN7+4zd+Lz6Z+tnHHzXlM6pAYJYnZh/Dg0jyZAb3ac6H
    n0eHwpJpTQzABQGJaXOYowvissEa81dCNmhnjQNN7ncDmgaoRchOYAMQCx0AgC7Q0HO3sxIk4lcT
    VbU0dX6beaAZNawWp/Moue5bF2IoJQwbe7Mp9mkodBY8r1NtqGwi/Dh4uqnLOJOyH4ljCTK8sL37
    XHa7ahsVQ1TLhdMjERvnV3pmBl1IizCPru5Dptr7wveGhyzNT67OWuUT7wVMIZrgDr+YU2x1MBBo
    z7fSbGXRzBRb966gKu7LfHJdkJ81P3ZIyRgMkfb1f8dpO+MXBJX1WyOjw+WJduNiAoG/dJZvsTLQ
    AXFXB0jRFa8ADy0yARttG+0j2faks7Dk4OhnTEhfnVZzt7WBEjrNyZ7ozxZ2L8ui5HT1DAZ20yiF
    C4FY5wY/gAinzhsFQHCv3184mkyXGDBrSkXY0z2X2DRE/mr7W5REifhovW0s6sDxVsd2O1qVBTbJ
    BWTGyGloFdoRohKJyIyupQFIfgI7eqYeZkhoTSyRuCyKOamcFygzpjKqWvAIXp5GnXEwY74evScF
    /+hZE0c+UT5LDFg+BAwVqaOq66tgNTLMXBvcDsgp1t+2lzJm45DoigRgQwOQTYRwLnYlc2dg6yXS
    rxCH58dclEoyvJ7tVejKIHYB2d8GX4UgiTbmyDymQzgr1glRTKUwShtxeuGUItT0KyikOv5V6se5
    G43J1hI9ewlhEemwxWbd9uIm+j+g+jRNjU2uf+CAFMS6Ilw0CIOHbnTQmxJGBKn+meOHVpFf/gX+
    ePJ359NGvk20HUGyP3Y5QN1Ce559SfkqDF1PL9iutj9M6ehEwJOb/cwKARb3sOh5LrnAeRHXc11o
    kLko7z33QCPMaCylJenKfGwpwYWVC3G257h1RyMtOh8F9FbNV2nnOZAHh0Oz5ZsvwGuvPorijvvO
    o1UsCYEVBraK2BOdJ/wjwShwcMt+GwFfLNi7W0ZdBSrd2oCmxr8JHYyrenwRInmXRCusSPLvwGG5
    a3luCSpRbu7EvKvFyoC63LReBx0eH9QDLqissNcHFeOEEnYKbCaQ0M7AHzygqAgv6shFR+yCB+4M
    jNOr2Ad1M7oB87CWhrf7+DATHYJWsU4C+fcazdFs9ri2kEh2hzaThUNW3aYhukkNke73HdHBsqTH
    kjPzkoLVtmJkzm0Un+bh8zxiWcRdPtdmsTGgohV6x7WP13n/TLRhbkSwzL1EbK0iv+XkKktXJRoc
    ztqCmUKO8QXcP8S6LkEPMyXD25wwlr5bbaca53yUVLl1WkppNn28yhnlPveADOyBGLobFrUu4mtx
    t18DXbUJZel/AFB41JHtpGPCRglT9825rg5koGsQ3WwFuR8OMkRHCcYaV/b9Yf07TMn/m6hX4zBD
    TRH45KWoxdX4W5ddFtamXuzYhp4+E8tOQOtJKZgAooEQRkhXM6BE5pF8hI4Aooh5QRNTQEO1wYyT
    qXYdOFHdp9+tSKeCu5GuHfJtG7TmGsFF02oyLvMxHxU25mfPefWiVbdigjUtOa+93LPfLv2H6tpK
    s5ZDi8nIBkyCzTDkb8/oJPGRbFjV9gI41aWt//ZZoU9hC3buvlpO2eJ7BNbUzPGhbKBZFSUg27Sj
    exJAdC5PnOkaZJX/qHPADThiFHV/GOTW8c7RTzHwWJZMe7K0HyrhTYWfXOa/y617/JRIQz6WigsA
    Tk5s33oXmkuT4EsKenYX+EyQCSs0n3qU1nad5QNCRvHQAwAn4myDmKsfwEm5tpl2hbbSRImIkkwn
    udvjN7vAAphi7j57xYp38mIS44ZqPhGI+Fn1TqzVgtZgY6oH2bsUn15bRsd0sT7F8mlqZNoHwV27
    vlcS9HshltBNDb4jBtKBg6alhk69gI3t/5jTTlCgkVlxD+ZRVxy96VC+93gwlXdWPhuF8qyQ4ozh
    DDqvq5V2Uu0Fr/5NUFTi+yISkVUaHhiLHATQ+ergN8PmtpkG0v0GsX+ytCD9LRaQkN4ZQLY=
  </Signature>
</Certificate>

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

iQIcBAABCAAGBQJX3gq8AAoJEFAslq9JXcLZSdAQALgMLzDQtG/AhqDxfMAtG0GL
J76zelZDVOU+WCSERIQYcBmbkNfYqVV9dCGBz/joOBIzsTIFbKpKhShCo0JoJzdo
zcG3vNVEw6BUdanbMUjhPiPwcsyu0qLsaZH1R+GS6g9ASKU2Z4FuDn8e+4awfX3Z
2GJKcpcE5QknNMIpUQnnNpZQvgPAS950GqpfUe8AHyaOc/JFQvBCd8h5wVoolkMZ
TmiTVt12JDbQn5yDFyVy+YYmEstxhw+bPvEYbiXYQnUAl/H+FjKmfNLwyKDsYr3H
1foS2bTFRePOwDT6AOS4LWZ/4oiz4p9iryCPjQxx66pcWx8mOWvQdI3hi3G1C0TH
CUSEoIMpu7LRwo1lgG7Pxe4MrSnHyKL/Yh0yoPsYyLNXMuUNXkpsb6JeWHFd7ItO
kUc59PplzGeX7sCDF6TCOidqzpahFOoetWYEyLWdYXO4+BDUT/UU5ibvELfdrpdX
EQU2sXSyjl/9qe4pAfObCUoY+ybk1UFkRCxnJ+YjzP+Jmg9xThyzVkC4PaGbL4hT
gTh+wh2AGtAqergPMcDacHRCO2NF808kagQhdPfsPWxCYYxN3o4e1OGr7f83xp1f
GoQGWJ5VQWR5hvy3KZyjxPebXVYHtM2/rg6Xk37AA+F0Ofwm323gijl0Lc7lm1kL
1R7gkkyQ1FV2JqNSbLCX
=TNp1
-----END PGP SIGNATURE-----