shkoo

(require 'tramp)
(add-to-list 'file-name-handler-alist '("\\`/home/shkoo/devdir/" . shkoo-dev-file-handler))
(add-to-list 'file-name-handler-alist '("\\`~/devdir/" . shkoo-dev-file-handler))

(defun shkoo-dev-make-process (&rest args)
  (when args
      (let ((default-directory tramp-compat-temporary-file-directory)
	    (name (plist-get args :name))
	    (buffer (plist-get args :buffer))
	    (command (plist-get args :command))