9 datadir = '@local_lilypond_datadir@'
10 if not os.path.isdir (datadir):
11 datadir = '@lilypond_datadir@'
12 if os.environ.has_key ('LILYPONDPREFIX') :
13 datadir = os.environ['LILYPONDPREFIX']
14 while datadir[-1] == os.sep:
18 sys.path.insert (0, os.path.join (datadir, 'python'))
21 #if __name__ == '__main__':
27 preview_resolution = 90
29 preview_papersize = "a4"
32 program_name = sys.argv[0]
34 program_version = '@TOPLEVEL_VERSION@'
35 pseudo_filter_p = 0 # ugr.
37 help_summary = _ ("Convert PostScript to PNG image.")
38 copyright = ('Han-Wen Nienhuys <hanwen@cs.uu.nl',
39 'Jan Nieuwenhuizen <janneke@gnu.org')
41 option_definitions = [
42 ('', 'h', 'help', _ ("print this help")),
43 ('', 'V', 'verbose', _ ("be verbose")),
44 (_ ('PAPER'), 'P', 'papersize', _ ("use papersize PAPER")),
45 (_ ('RES'), 'R', 'resolution', _ ("set the resolution of the preview to RES")),
48 (sh, long) = ly.getopt_args (option_definitions)
50 (options, files) = getopt.getopt (sys.argv[1:], sh, long)
51 except getopt.error, s:
52 sys.stderr.write ('\n')
53 ly.error (_ ("getopt says: `%s\'" % s))
54 sys.stderr.write ('\n')
62 if o == '--help' or o == '-h':
65 elif o == '--papersize' or o == '-P':
67 elif o == '--resolution' or o == '-R':
68 preview_resolution = string.atoi (a)
69 elif o == '--verbose' or o == '-V':
73 outfiles = ly.make_ps_images (f, resolution = preview_resolution,
74 papersize = preview_papersize)
75 ## FIXME: silly message containing %d
77 sys.stderr.write (_ ("Wrote `%s'" % string.join (outfiles, ', ')))
78 sys.stderr.write ('\n')