 
 ;; comint erlang nodes
 (defconst riak-kv "riak_kv")
-(defconst riak-kv "riak_kv")
+(defconst riak-s3-api "riak_s3_api")
 (defconst dev1 "dev1")
 
 (defun erlang-start-riak-kv ()
   (interactive)
-  (erlang-start-riak_ee-dep riak-kv))
+  (erlang-start-node riak-kv))
 
 (defun erlang-stop-riak-kv ()
   (interactive)

        (comint-send-string (get-buffer-process buffer-name)
                        "q().\n")
      (message (format "no %s node running" node)))))

(defun comint-to-buffer-name (node)
  (format "*%s*" node))

  (interactive)
  (erlang-show-node riak-kv))

(defun erlang-clear-output-riak-kv ()
  (interactive)
  (erlang-clear-output-node riak-kv))

(defun erlang-flush-compilation-errors-riak-kv ()
  (interactive)
  (erlang-flush-compilation-errors-node riak-kv))

(defun erlang-start-riak-s3-api ()
  (interactive)
  (erlang-start-node riak-s3-api))

(defun erlang-stop-riak-s3-api ()
  (interactive)
