public
Created

Slime Windows-Unix-Path translation (Cygwin)

  • Download Gist
slime-cygwin.el
Emacs Lisp
1 2 3 4 5 6 7 8 9 10 11 12 13
(require 'clojure-mode "clojure-mode" t)
(require 'slime t)
 
(when (eq system-type 'cygwin)
(add-hook 'slime-connected-hook (lambda ()
(setq slime-to-lisp-filename-function (lambda (filename)
(replace-regexp-in-string
"\n" "" (shell-command-to-string
(format "cygpath.exe --windows %s" filename))))
slime-from-lisp-filename-function (lambda (filename)
(replace-regexp-in-string
"\n" "" (shell-command-to-string
(format "cygpath.exe --unix %s" filename)))))) t))

Please sign in to comment on this gist.

Something went wrong with that request. Please try again.