Dolda2000 GitWeb
/
doldaconnect.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Updated spec files for the new library version.
[doldaconnect.git]
/
lib
/
guile
/
dolcon
/
ui.scm
diff --git
a/lib/guile/dolcon/ui.scm
b/lib/guile/dolcon/ui.scm
index
bf57b06
..
b8ec63f
100644
(file)
--- a/
lib/guile/dolcon/ui.scm
+++ b/
lib/guile/dolcon/ui.scm
@@
-68,10
+68,9
@@
(define-public dc-ecmd
(lambda args
(let ((tag (dc-qcmd args)))
- (if (>= tag 0)
- (do ((resp (dc-getresp tag) (dc-getresp tag)))
- (resp resp)
- (dc-select)))
+ (do ((resp (dc-getresp tag) (dc-getresp tag)))
+ (resp resp)
+ (dc-select))
)
)
)