   (let ((zomp-new-shell-buffer-name zomp-shell-buffer-name)
         (oldwin (selected-window)))
     (let ((default-directory zomp-basedir)
-          (explicit-shell-file-name "./build/release_32/deploy/zompsh"))
+          (explicit-shell-file-name (zomp-zompsh-command)))
       (shell zomp-shell-buffer-name))
     ;; in case zomp-shell-buffer-name is buffer local we need to be sure it
     ;; has the same value in the shell buffer as in the zomp buffer invoking

   (when (equal create-if-not-existing 'create)
     (zomp-shell)
     (get-buffer-process zomp-shell-buffer-name))))

(defun zomp-shell-move-point-to-end ()
  "Will move the point to the end of the shell buffer for all


  (local-set-key [(control c) (?.) (?s)] 'zomp-shell-sexpr-syntax)
  (local-set-key [(control c) (?.) (?i)] 'zomp-shell-indent-syntax)

  (local-set-key [(control c) (?.) (?D)] 'zomp-toggle-variant)

  (zomp-add-seperator zomp-sep-3)
  (zomp-add-action zomp-shell-run [(control c)(control d)] "Run function...")
