* gnus-srvr.el (gnus-server-toggle-cloud-server): New command and
keystroke.
+ (gnus-server-toggle-cloud-server): Only allow clouding applicable
+ types.
* ietf-drums.el (ietf-drums-parse-address): Don't bug out when called
with an empty string.
(unless server
(error "No server on the current line"))
+ (unless (gnus-method-option-p server 'cloud)
+ (error "The server under point doesn't support cloudiness"))
+
(if (gnus-cloud-server-p server)
(setq gnus-cloud-covered-servers
(delete server gnus-cloud-covered-servers))
:type 'string)
(defcustom gnus-valid-select-methods
- '(("nntp" post address prompt-address physical-address)
+ '(("nntp" post address prompt-address physical-address cloud)
("nnspool" post address)
("nnvirtual" post-mail virtual prompt-address)
("nnmbox" mail respool address)
("nnrss" none global)
("nnagent" post-mail)
("nnimap" post-mail address prompt-address physical-address respool
- server-marks)
+ server-marks cloud)
("nnmaildir" mail respool address server-marks)
("nnnil" none))
"*An alist of valid select methods.