actuallly the code that does the windows specific stuff right now sits in GUB.
On Wed, Aug 27, 2008 at 9:08 PM, Neil Puttock <[EMAIL PROTECTED]> wrote:
> 2008/8/6 Neil Puttock <[EMAIL PROTECTED]>:
>> 2008/8/5 Han-Wen Nienhuys <[EMAIL PROTECTED]>:
>>> There is also some code in lily.scm that checks for a windows system.
>>> It's easier to add to there rather than the .nsh
>>
>> I've tried setting 'midi-extension here:
>>
>> (case PLATFORM
>> ((windows)
>> ;; change midi default for Windows
>> (ly:set-option 'midi-extension "mid")
>> (define native-getcwd getcwd)
>> (define (slashify x)
>> (if (string-index x #\\)
>> x
>> (string-regexp-substitute
>> "//*" "/"
>> (string-regexp-substitute "\\\\" "/" x))))
>> ;; FIXME: this prints a warning.
>> (define-public (ly-getcwd)
>> (slashify (native-getcwd))))
>> (else (define-public ly-getcwd getcwd)))
>>
>> Since I can't check whether this works on Windows, I temporarily moved
>> the option setting to the else clause. Unfortunately, though this
>> overrides the default, setting midi-extension via the command line no
>> longer works.
>
> OK, I've had another look at this.
>
> The command line options using -d are set near the top of the file,
>
> 96 (for-each
> 97 (lambda (x)
> 98 (ly:set-option (car x) (cdr x)))
> 99 (eval-string (ly:command-line-options)))
>
> whereas the entry point code evaluates a Scheme expression using -e.
>
> Can the code which checks for a windows system be moved above the
> command line setting?
Can you change the option init ,
`(...
("midi-extension" ,(if windows "mid" "midi") "the extension of midi files")
...
)
--
Han-Wen Nienhuys - [EMAIL PROTECTED] - http://www.xs4all.nl/~hanwen
_______________________________________________
lilypond-devel mailing list
lilypond-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-devel
