 
 (defeci cs-add ((chainsetup "sChainsetup to add: " "%s"))
   "Adds a new chainsetup with name `name`."
+  :pcomplete doc)
+
+(defeci cs-option ((option "sOption string: " "%s"))
+  "Send an option command to ecasound."
   :pcomplete doc)
 
 (defeci cs-connect ()

    (if (and result (not (string= result "")))
	result
      default)))

;;; Markers



(defeci ai-selected ()
  "Returns the name of the currently selected audio input object."
  :pcomplete doc)

(defeci ai-get-length ()
  "Returns the audio object length in seconds."
  :pcomplete doc)

(defeci ai-set-position 
  ((pos
    (if current-prefix-arg
	(prefix-numeric-value current-prefix-arg)
      (read-minibuffer "Position: ")) "%f"))
  "Set audio input position to POS."
  :pcomplete doc)

(defeci ai-set-position-samples ((pos))
  "Set audio object position to POS samples from beginning."
  :pcomplete doc)

(defeci ao-add ((filename "FOutput filename: " "%s"))
