branch: elpa/elpher
commit 79c241f1ce5d4e4f2ba377485f4434e93391eb0f
Author: plugd <[email protected]>
Commit: plugd <[email protected]>
Removed last remaining url-port usage.
---
elpher.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/elpher.el b/elpher.el
index 92362286fe..b4048a71ad 100644
--- a/elpher.el
+++ b/elpher.el
@@ -463,7 +463,8 @@ For gopher addresses this is a combination of the selector
type and selector."
"Retrieve port from ADDRESS object.
If no address is defined, returns 0. (This is for compatibility with
the URL library.)"
- (url-port address))
+ (let ((port (url-portspec address))) ; (url-port) is too slow!
+ (if port port 0)))
(defun elpher-gopher-address-selector (address)
"Retrieve gopher selector from ADDRESS object."
