The Lambda Lab
/
projects
/
elpher.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
bf4ca5f
)
Added :nowait t to gopher selector retriever.
author
Tim Vaughan
<tgvaughan@gmail.com>
Thu, 24 Oct 2019 12:31:54 +0000
(14:31 +0200)
committer
Tim Vaughan
<tgvaughan@gmail.com>
Thu, 24 Oct 2019 12:31:54 +0000
(14:31 +0200)
elpher.el
patch
|
blob
|
history
diff --git
a/elpher.el
b/elpher.el
index
db5a820
..
bd8cc42
100644
(file)
--- a/
elpher.el
+++ b/
elpher.el
@@
-511,7
+511,8
@@
up to the calling function."
nil
host
(if (> port 0) port 70)
nil
host
(if (> port 0) port 70)
- :type (if elpher-use-tls 'tls 'plain))))
+ :type (if elpher-use-tls 'tls 'plain)
+ :nowait t)))
(set-process-coding-system proc 'binary)
(set-process-filter proc
(lambda (_proc string)
(set-process-coding-system proc 'binary)
(set-process-filter proc
(lambda (_proc string)
@@
-554,7
+555,8
@@
once they are retrieved from the gopher server."
(insert "LOADING... (use 'u' to cancel)"))
(elpher-get-selector address
(lambda (_proc event)
(insert "LOADING... (use 'u' to cancel)"))
(elpher-get-selector address
(lambda (_proc event)
- (unless (string-prefix-p "deleted" event)
+ (unless (or (string-prefix-p "deleted" event)
+ (string-prefix-p "open" event))
(funcall renderer elpher-selector-string)
(elpher-restore-pos)))))))
(funcall renderer elpher-selector-string)
(elpher-restore-pos)))))))