#!@PYTHON@
-import operator
-import stat
-import string
-import traceback
+import getopt
import glob
-import getopt, os, sys
+import os
+import string
+import sys
+
datadir = '@local_lilypond_datadir@'
if not os.path.isdir (datadir):
datadir = '@lilypond_datadir@'
while datadir[-1] == os.sep:
datadir= datadir[:-1]
-
sys.path.insert (0, os.path.join (datadir, 'python'))
# Customize these
global re;re = ly.re
preview_resolution = 90
+# Use /etc/papersize?
+preview_papersize = "a4"
# lilylib globals
-program_name = sys.argv[0]
+program_name = os.path.basename (sys.argv[0])
verbose_p = 0
program_version = '@TOPLEVEL_VERSION@'
pseudo_filter_p = 0 # ugr.
option_definitions = [
('', 'h', 'help', _ ("print this help")),
('', 'V', 'verbose', _ ("be verbose")),
- (_ ('RES'), 'R', 'resolution',
- _ ("set the resolution of the preview to RES")),
+ (_ ('PAPER'), 'P', 'papersize', _ ("use papersize PAPER")),
+ (_ ('RES'), 'R', 'resolution', _ ("set the resolution of the preview to RES")),
]
(sh, long) = ly.getopt_args (option_definitions)
a = opt[1]
if o == '--help' or o == '-h':
+ ly.identify (sys.stdout)
ly.help ()
sys.exit (0)
+ elif o == '--papersize' or o == '-P':
+ preview_papersize = a
elif o == '--resolution' or o == '-R':
preview_resolution = string.atoi (a)
elif o == '--verbose' or o == '-V':
verbose_p = 1
+ly.identify (sys.stderr)
for f in files:
- out = ly.make_ps_images (f, resolution = preview_resolution)
- ## FIXME: silly message containing %d
- sys.stderr.write (_ ("Wrote `%s'" % out))
+ outfiles = ly.make_ps_images (f, resolution = preview_resolution,
+ papersize = preview_papersize)
+ sys.stderr.write (_ ("Wrote `%s'" % string.join (outfiles, ', ')))
sys.stderr.write ('\n')