summaryrefslogtreecommitdiff
path: root/jabber-disco.el
diff options
context:
space:
mode:
authorMatteo F. Vescovi <mfv@debian.org>2016-11-06 14:40:49 +0100
committerMatteo F. Vescovi <mfv@debian.org>2016-11-06 14:40:49 +0100
commite12b0ce8663bf326405d9fb231e9fefd7eea4df2 (patch)
tree12bd04ea48b48d94fb9eb981a87d497f5bb68998 /jabber-disco.el
parent733da055ee4ab8f6ab5947a6dd43d1c84c7cbeea (diff)
New upstream version 0.8.92
Diffstat (limited to 'jabber-disco.el')
-rw-r--r--jabber-disco.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/jabber-disco.el b/jabber-disco.el
index c2c09cc..38cb213 100644
--- a/jabber-disco.el
+++ b/jabber-disco.el
@@ -167,7 +167,7 @@ See JEP-0030."
(identity ((category . "client")
(name . "Emacs Jabber client")
(type . ,(if (memq window-system
- '(x w32 mac))
+ '(x w32 mac ns))
"pc"
"console"))))
,@(mapcar
@@ -180,7 +180,7 @@ See JEP-0030."
(defun jabber-get-disco-items (jc to &optional node)
"Send a service discovery request for items"
(interactive (list (jabber-read-account)
- (jabber-read-jid-completing "Send items disco request to: ")
+ (jabber-read-jid-completing "Send items disco request to: " nil nil nil 'full t)
(jabber-read-node "Node (or leave empty): ")))
(jabber-send-iq jc to
"get"
@@ -195,7 +195,7 @@ See JEP-0030."
(defun jabber-get-disco-info (jc to &optional node)
"Send a service discovery request for info"
(interactive (list (jabber-read-account)
- (jabber-read-jid-completing "Send info disco request to: ")
+ (jabber-read-jid-completing "Send info disco request to: " nil nil nil 'full t)
(jabber-read-node "Node (or leave empty): ")))
(jabber-send-iq jc to
"get"