Index: client/1.0/neutral/common.tcl
==================================================================
--- client/1.0/neutral/common.tcl
+++ client/1.0/neutral/common.tcl
@@ -149,10 +149,20 @@
     variable allowInsecureRedirect; # DEFAULT: false
 
     if {![info exists allowInsecureRedirect]} then {
       set allowInsecureRedirect false
     }
+
+    #
+    # NOTE: How long should we wait for the HTTP request to complete?  This
+    #       value is the number of milliseconds.
+    #
+    variable timeoutGetUrl; # DEFAULT: 0
+
+    if {![info exists timeoutGetUrl]} then {
+      set timeoutGetUrl 0
+    }
   }
 
   #
   # NOTE: This procedure was stolen from the "common.tcl" script.  It is
   #       designed to emit a message to the console.  The channel argument
@@ -266,10 +276,16 @@
     # NOTE: This variable is used to keep track of the currently scheduled
     #       (i.e. pending) [after] event.
     #
     variable afterForPageProgress
 
+    #
+    # NOTE: This variable is used to determine the timeout milliseconds for
+    #       HTTP requests.
+    #
+    variable timeoutGetUrl
+
     #
     # 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
@@ -351,11 +367,38 @@
         #
         pageLog [appendArgs \
             "attempting to download URL \"" $uri \"...]
       }
 
-      set token [eval ::http::geturl [list $uri] $args]
+      #
+      # NOTE: Build the (optional?) list of options for the HTTP call.
+      #
+      set localArgs [list]
+
+      if {$timeoutGetUrl != 0} then {
+        lappend localArgs -timeout $timeoutGetUrl; # milliseconds
+      }
+
+      if {[llength $args] > 0} then {
+        eval lappend localArgs $args
+      }
+
+      #
+      # NOTE: Attempt to perform the actual HTTP request.  This can fail
+      #       in an almost unlimited number of ways, which is fun.
+      #
+      set token [eval ::http::geturl [list $uri] $localArgs]
+
+      #
+      # NOTE: Grab the HTTP status.  It must be "ok" in order to proceed.
+      #
+      set status [::http::status $token]
+
+      if {$status ne "ok"} then {
+        error [appendArgs \
+            "bad HTTP status \"" $status "\" is not \"ok\""]
+      }
 
       #
       # NOTE: Grab the HTTP response code and data now as they are needed
       #       in almost all cases.
       #

Index: client/1.0/neutral/common.tcl.asc
==================================================================
--- client/1.0/neutral/common.tcl.asc
+++ client/1.0/neutral/common.tcl.asc
@@ -1,17 +1,18 @@
 -----BEGIN PGP SIGNATURE-----
+Version: GnuPG v2
 Comment: Eagle Package Repository
 
-iQIzBAABCAAdFiEEw8dROIPu3TrtH+QlUCyWr0ldwtkFAl871kkACgkQUCyWr0ld
-wtmbaw/+Jl0fkoSSMnANI+p22u/iBlmKxuWbz7FGl02TY+ztxbQW5DQo5yH/jvcJ
-7Q6Rpq8qw8miGL/b+5a7cX+cEF6CHN6q2p/qgZBFSoZfdGlY55UqTi4VH26nb6NT
-MXRhluzUERUK9WH717K4NBc4zE3D/rZiPNsZMHD0mV6058NE1YBdl/W+y3YHrXr+
-snU2OWQgvq4sNKzz/u3GNuAsRG8iXpsoPJuTwayGfNBI5kegkOxQDlvqaxu+UeXz
-HUFSMgKeEdNS5BQF4jW5vPWmmNf3IgMpnDGBzf06g5bYDc3To+b5gJ2+eUblrSri
-pWg6yAXQoLeN3Agpb9ciZ4XwuyWO4g/AHJDH4K1bPO5yxC64f4f8Zo4OTPVTZk5R
-wTpSyJw4kJpy3JddWfyBqLbvLxK2DqVd7KQ78/QOy/cKhiDSYaLmJ7+AEpXGBc3s
-rVpuxnBt6O7D0k4ukIXlcL9vakz2fag/2mMn095Ot/j0sTS0F3GQtBSeTxqfcn4R
-cvD81mbXorQ1nh3KEWR6RniABUHXTuZIBrXMF2IlV+vAfkBC2xwD2OPe9viHqLy4
-nHJfHBVxAm2tdVhOD8v6E5SEJ0nGrHEn9yRiY2w82zvHAq/PEXEwYsJSdePJLAxN
-EbMJMeY6SU8GxcfEPD7u8f6a9JOuU1yijdvqflOteEqnmZzPeNg=
-=KgNy
+iQIcBAABCAAGBQJfl2SjAAoJEFAslq9JXcLZBIAQAJtAKkFq8derj6+2T+hAXLMD
+RmLmTwx1C96tYdYNRjo5cguWPiAVdumV+rML9MBQU+zuuf5BC4lVQcWOMAuGktk0
+tjOOslgC3zHKRnMl0IZXgsIpTevobdTqTNiwnB13yvn6Crhicr86247uomSQd6Vz
+3SypUWnJ8bXEpYb9QWHeOsW8ZuvM9m9wjnA5eXEbtEOyuT9D7GWf6xSPT0b3TR5E
+K2yWBo2+O5X/SMQclh1IbzOr849fQuyqzT2WljfxWBnc5kmZhRJ3aJI2MRaWiicN
+LNtRGr1Oz4Pkjmg9S+bGDF/sgI1EOaBPzaYUU1G92G5HOLSu3uAU3Iujj4S6RSVu
+1N6qLIGKaJtFea7UBB/9i5o07YJzfdYwIJPBg+PBQbKSXycaYNcT5UEMJhsbfsA4
+8cYuI+1QPi7OC/GQlS5GQ0JYj6RrYTP9vh1TJyiiDvSYKjrNMmZ514ALe7ETk31c
+dnVmgiBTFe2NHKOj9+XhVKglAOr1Ujsu84YQaAuLczjoLf0BHXdXfkC7oUmQw270
+yqegS3izJlcOsRWT4s9RjTASuocJuL6fhcySqxVuto4hGhqWRM0eN/eApOFmcxBg
+FC9V/Y8ZFrYibhkVM1ZbuFZq/30J1hqamEBZ/9G/EUK4l47I2g1n9pIKkFXVC2hY
+QIA8sqOFCDt/3cGh04WZ
+=a0du
 -----END PGP SIGNATURE-----