Increase default number of concurrent workers from 5 to 20

diff --git a/info.rkt b/info.rkt
index 361d8f1..26782f8 100644 (file)
--- a/info.rkt
+++ b/info.rkt
@@ -6,7 +6,7 @@
 (define pkg-desc
   "twtxt client")
 (define version
-  "0.30.0")
+  "0.30.1")
 (define pkg-authors
   '("Siraaj Khandkar <siraaj@khandkar.net>"))
 (define deps

diff --git a/tt.rkt b/tt.rkt
index 16dffac..58419dc 100644 (file)
--- a/tt.rkt
+++ b/tt.rkt
@@ -1024,9 +1024,7 @@
 (define (dispatch command)
   (match command
     [(or "d" "download")
-     ; Initially, 15 was fastest out of the tried: 1, 5, 10, 20.  Then I
-     ; started noticing significant slowdowns. Reducing to 5 seems to help.
-     (let ([num-workers 5]
+     (let ([num-workers 20] ; 20 was fastest out of the tried: 1, 5, 10, 20, 25, 30.
            [timeout     10.0])
        (command-line
          #:program "tt download"