Function: eudc-hotlist-delete-server

eudc-hotlist-delete-server is an interactive and byte-compiled function defined in eudc-hotlist.el.gz.

Signature

(eudc-hotlist-delete-server)

Documentation

Delete the server at point from the list.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/net/eudc-hotlist.el.gz
(defun eudc-hotlist-delete-server ()
  "Delete the server at point from the list."
  (interactive)
  (if (not (derived-mode-p 'eudc-hotlist-mode))
      (error "Not in a EUDC hotlist edit buffer"))
  (let ((buffer-read-only nil))
    (save-excursion
      (beginning-of-line)
      (if (and (>= (point) eudc-hotlist-list-beginning)
	       (looking-at "^\\([-.a-zA-Z:0-9]+\\)[ \t]+\\([a-zA-Z]+\\)"))
	  (kill-line 1)
	(error "No server on this line")))))