adding scheme-program-name for M-x run-scheme