Function: eudc-hotlist-select-server
eudc-hotlist-select-server is an interactive and byte-compiled
function defined in eudc-hotlist.el.gz.
Signature
(eudc-hotlist-select-server)
Documentation
Select the server at point as the current server.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/net/eudc-hotlist.el.gz
(defun eudc-hotlist-select-server ()
"Select the server at point as the current server."
(interactive)
(if (not (derived-mode-p 'eudc-hotlist-mode))
(error "Not in a EUDC hotlist edit buffer"))
(save-excursion
(beginning-of-line)
(if (and (>= (point) eudc-hotlist-list-beginning)
(looking-at "^\\([-.a-zA-Z:0-9]+\\)[ \t]+\\([a-zA-Z]+\\)"))
(progn
(eudc-set-server (match-string 1) (intern (match-string 2)))
(message "Current directory server is %s (%s)" eudc-server eudc-protocol))
(error "No server on this line"))))