|
@@ -72,9 +72,9 @@ the midi file is not automatically played. Default value is t")
|
|
|
(defvar ly-nix-pdf-path "evince")
|
|
|
(defvar ly-nix-midi-path "timidity")
|
|
|
|
|
|
-(defvar ly-win32-ly-path "lilypond")
|
|
|
-(defvar ly-win32-pdf-path "")
|
|
|
-(defvar ly-win32-midi-path "")
|
|
|
+(defvar ly-w32-ly-path "lilypond")
|
|
|
+(defvar ly-w32-pdf-path "")
|
|
|
+(defvar ly-w32-midi-path "")
|
|
|
|
|
|
(defvar ly-gen-png nil
|
|
|
"Image generation (png) can be turned on by default by setting
|
|
@@ -333,8 +333,8 @@ If TEST is non-nil, it contains a simulation of the OS for test purposes"
|
|
|
(or test system-type)))
|
|
|
(cond ((string= sys-type "darwin")
|
|
|
ly-OSX-ly-path)
|
|
|
- ((string= sys-type "win32")
|
|
|
- ly-win32-ly-path)
|
|
|
+ ((string= sys-type "windows-nt")
|
|
|
+ ly-w32-ly-path)
|
|
|
(t ly-nix-ly-path))))
|
|
|
|
|
|
(defun ly-determine-pdf-path (&optional test)
|
|
@@ -344,8 +344,8 @@ If TEST is non-nil, it contains a simulation of the OS for test purposes"
|
|
|
(or test system-type)))
|
|
|
(cond ((string= sys-type "darwin")
|
|
|
ly-OSX-pdf-path)
|
|
|
- ((string= sys-type "win32")
|
|
|
- ly-win32-pdf-path)
|
|
|
+ ((string= sys-type "windows-nt")
|
|
|
+ ly-w32-pdf-path)
|
|
|
(t ly-nix-pdf-path))))
|
|
|
|
|
|
(defun ly-determine-midi-path (&optional test)
|
|
@@ -355,8 +355,8 @@ If TEST is non-nil, it contains a simulation of the OS for test purposes"
|
|
|
(or test test system-type)))
|
|
|
(cond ((string= sys-type "darwin")
|
|
|
ly-OSX-midi-path)
|
|
|
- ((string= sys-type "win32")
|
|
|
- ly-win32-midi-path)
|
|
|
+ ((string= sys-type "windows-nt")
|
|
|
+ ly-w32-midi-path)
|
|
|
(t ly-nix-midi-path))))
|
|
|
|
|
|
(defun ly-toggle-midi-play ()
|