From: fred <fred> Date: Wed, 27 Mar 2002 01:22:40 +0000 (+0000) Subject: lilypond-1.3.148 X-Git-Tag: release/1.5.59~525 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f5703dd33abe29573f14ed4f4253f8aed322709d;p=lilypond.git lilypond-1.3.148 --- diff --git a/Documentation/windows/gv.sh b/Documentation/windows/gv.sh deleted file mode 100644 index 8346a38e8e..0000000000 --- a/Documentation/windows/gv.sh +++ /dev/null @@ -1,9 +0,0 @@ -#!/bin/bash -if echo | gsview32 -; then - cat <<EOF -GSView not found. Install gsview from -http://cm.bell-labs.com/who/wim/ghost/gsv26550.exe -Make sure gsview32.exe in in your $PATH -EOF -fi -gsview32 `cygpath -w $1` diff --git a/Documentation/windows/ly2dvi.sh b/Documentation/windows/ly2dvi.sh deleted file mode 100644 index 8d0f4f22f2..0000000000 --- a/Documentation/windows/ly2dvi.sh +++ /dev/null @@ -1,8 +0,0 @@ -#!/bin/bash -if echo | python -; then - cat <<EOF -Python not found. Install python-1.5.2 from www.python.org. -Make sure python.exe in in your $PATH -EOF -fi -python `cygpath -w /usr/lilypond/bin/ly2dvi.py` $* diff --git a/lily/scheme-option.cc b/lily/scheme-option.cc deleted file mode 100644 index 16b2a9d830..0000000000 --- a/lily/scheme-option.cc +++ /dev/null @@ -1,78 +0,0 @@ -/* - scheme-option.cc -- implement option setting from Scheme - - source file of the GNU LilyPond music typesetter - - (c) 2001 Han-Wen Nienhuys <hanwen@cs.uu.nl> - - */ - -#include "lily-guile.hh" - -/* - TODO: mooie onschuldige test, en koel om allerleide dingen te kunnen zetten, - maar is dit nou wel handig voor gebruikert? - - -X, of -fps is hendiger dan - - -e "(set-lily-option 'midi-debug #t)' - - [niet voor niets tiepo in 139 announs..] - -*/ -/* Write midi as formatted ascii stream? */ -bool midi_debug_global_b; - - -/* - - Todo: print help text. - - - other interesting stuff to add: - -@item -T,--no-timestamps -don't timestamp the output - -@item -t,--test -Switch on any experimental features. Not for general public use. - - */ - -SCM -set_lily_option (SCM var, SCM val) -{ - if (var == ly_symbol2scm ("midi-debug")) - { - midi_debug_global_b = to_boolean (val); - } - else if (var == ly_symbol2scm ("find-old-relative")) - { - /* - Seems to have been broken for some time! - - @item -Q,--find-old-relative - show all changes needed to convert a file to relative octave syntax. - - - - */ - - ; - - } - - return SCM_UNSPECIFIED; -} - - -static void -init_functions () -{ - scm_make_gsubr ("set-lily-option", 2, 0, 0, (Scheme_function_unknown)set_lily_option); -} - - -ADD_SCM_INIT_FUNC (init_functions_sopt, init_functions); - -