X-Git-Url: http://git.dolda2000.com/gitweb/?a=blobdiff_plain;f=lib%2Fguile%2Fautodl;h=af98f9ef879a5433b965dc4c75029e2ced3a79ce;hb=a8e6bb8183d91e91e4244d55cc24829db4ce307d;hp=32eb92d3fe20e1564965647c9dd6a75d31b264d6;hpb=2fc2772d678c091e7d73e903e90d884b5db84efa;p=doldaconnect.git

diff --git a/lib/guile/autodl b/lib/guile/autodl
index 32eb92d..af98f9e 100755
--- a/lib/guile/autodl
+++ b/lib/guile/autodl
@@ -381,7 +381,7 @@
 
 (define (autodl-main args)
   (let ((dc-server #f) (done #f) (retval 0) (filterexit ""))
-    (let ((getopt (make-getopt (cdr args) "whs:S:e:p:t:a:I:")) (arg #f))
+    (let ((getopt (make-getopt (cdr args) "whs:S:e:p:t:a:I:E:")) (arg #f))
       (do ((arg (getopt) (getopt))) ((not (and (pair? arg) (char? (car arg)))) (set! args arg))
 	(cond ((eq? (car arg) #\h)
 	       (begin (display "usage: autodl [-s server] -S sessfile\n" (current-error-port))