X-Git-Url: http://dolda2000.com/gitweb/?a=blobdiff_plain;f=lib%2Fguile%2Fautodl;h=281c2364e6b68e46ce7dd2cd22baddbc5617a484;hb=23d33e0ed6b2365d1f2b9db37e3a93ab8717e446;hp=11a5a9096723dbdb941e727ec6d431b87df49da2;hpb=2bb57f497fc1acd6460db9e9eeab5dce0d693d15;p=doldaconnect.git diff --git a/lib/guile/autodl b/lib/guile/autodl index 11a5a90..281c236 100755 --- a/lib/guile/autodl +++ b/lib/guile/autodl @@ -422,7 +422,7 @@ (if (not (assoc 'maxtrans session)) (set! session (cons '(maxtrans . 1) session))) (if (not (assoc 'search-mode session)) - (set! session (cons '(search-mode . wait) session))) + (set! session (cons '(search-mode . normal) session))) (if (not (validate-session session)) (begin (display "Invalid session!\n" (current-error-port)) (exit 1))) (if (not dc-server) (set! dc-server (getenv "DCSERVER"))) (if (not dc-server) (set! dc-server "localhost")) @@ -432,7 +432,7 @@ (lambda (key . args) (logf (string-append "could not connect to server: " (apply format #f (cadr args) (caddr args)))) (exit 2))) - (dc-ecmd-assert 200 "notify" "all" "on") + (dc-ecmd-assert 200 "notify" "trans:act" "on" "trans:prog" "on" "srch:act" "on") (for-each (lambda (sig) (sigaction sig (lambda (sig) (throw 'sig sig)))) (list SIGINT SIGTERM SIGHUP)) (catch 'sig (lambda ()