OLD | NEW |
1 ;;;; lily.scm -- top-level Scheme stuff | 1 ;;;; lily.scm -- top-level Scheme stuff |
2 ;;;; | 2 ;;;; |
3 ;;;; source file of the GNU LilyPond music typesetter | 3 ;;;; source file of the GNU LilyPond music typesetter |
4 ;;;; | 4 ;;;; |
5 ;;;; (c) 1998--2009 Jan Nieuwenhuizen <janneke@gnu.org> | 5 ;;;; (c) 1998--2009 Jan Nieuwenhuizen <janneke@gnu.org> |
6 ;;;; Han-Wen Nienhuys <hanwen@xs4all.nl> | 6 ;;;; Han-Wen Nienhuys <hanwen@xs4all.nl> |
7 | 7 |
8 ;; Internationalisation: (_i "to be translated") gets an entry in the | 8 ;; Internationalisation: (_i "to be translated") gets an entry in the |
9 ;; POT file; (gettext ...) must be invoked explicitly to do the actual | 9 ;; POT file; (gettext ...) must be invoked explicitly to do the actual |
10 ;; "translation". | 10 ;; "translation". |
(...skipping 20 matching lines...) Expand all Loading... |
31 ;; - [subject-]object-object-verb +"ing" | 31 ;; - [subject-]object-object-verb +"ing" |
32 ;; - [subject-]-verb-object-object | 32 ;; - [subject-]-verb-object-object |
33 | 33 |
34 ;; Avoid overlong lines in `lilypond -dhelp'! Strings should not | 34 ;; Avoid overlong lines in `lilypond -dhelp'! Strings should not |
35 ;; be longer than 48 characters per line. | 35 ;; be longer than 48 characters per line. |
36 | 36 |
37 (anti-alias-factor 1 | 37 (anti-alias-factor 1 |
38 "Render at higher resolution (using given factor) | 38 "Render at higher resolution (using given factor) |
39 and scale down result to prevent jaggies in | 39 and scale down result to prevent jaggies in |
40 PNG images.") | 40 PNG images.") |
| 41 (aux-files #t· |
| 42 "Create .tex, .texi, .count files in the· |
| 43 EPS backend.") |
41 (backend ps | 44 (backend ps |
42 "Select backend. Possible values: 'eps, 'null, | 45 "Select backend. Possible values: 'eps, 'null, |
43 'ps, 'scm, 'socket, 'svg.") | 46 'ps, 'scm, 'socket, 'svg.") |
44 (check-internal-types #f | 47 (check-internal-types #f |
45 "Check every property assignment for types.") | 48 "Check every property assignment for types.") |
46 (clip-systems #f | 49 (clip-systems #f |
47 "Generate cut-out snippets of a score.") | 50 "Generate cut-out snippets of a score.") |
48 (datadir #f | 51 (datadir #f |
49 "LilyPond prefix for data files (read-only).") | 52 "LilyPond prefix for data files (read-only).") |
50 (debug-gc #f | 53 (debug-gc #f |
(...skipping 699 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
750 (exit 0))))) | 753 (exit 0))))) |
751 | 754 |
752 (define (gui-no-files-handler) | 755 (define (gui-no-files-handler) |
753 (let* ((ly (string-append (ly:effective-prefix) "/ly/")) | 756 (let* ((ly (string-append (ly:effective-prefix) "/ly/")) |
754 ;; FIXME: soft-code, localize | 757 ;; FIXME: soft-code, localize |
755 (welcome-ly (string-append ly "Welcome_to_LilyPond.ly")) | 758 (welcome-ly (string-append ly "Welcome_to_LilyPond.ly")) |
756 (cmd (get-editor-command welcome-ly 0 0 0))) | 759 (cmd (get-editor-command welcome-ly 0 0 0))) |
757 (ly:message (_ "Invoking `~a'...\n") cmd) | 760 (ly:message (_ "Invoking `~a'...\n") cmd) |
758 (system cmd) | 761 (system cmd) |
759 (exit 1))) | 762 (exit 1))) |
OLD | NEW |