* scm/lily.scm (lilypond-all): option read-file-list: substitute

[lilypond.git] / lily / main.cc

diff --git a/lily/main.cc b/lily/main.cc
index 5f9b2a77f657f3e4c02dd68518e8a7d39cf66c31..ae4c86dd2ae9b8f339eb4ce132f5192f0a52f0e3 100644 (file)
--- a/lily/main.cc
+++ b/lily/main.cc
@@ -427,6 +427,7 @@ main_with_guile (void *, int, char **)
       *tail = scm_cons (scm_makfrom0str (arg), SCM_EOL);
       tail = SCM_CDRLOC (*tail);
     }
+  
   delete option_parser;
   option_parser = 0;
 
@@ -540,7 +541,12 @@ parse_argv (int argc, char **argv)
          break;
 
        case 'f':
-         output_format_global = option_parser->optional_argument_str0_;
+         {
+           vector<string> components
+             = string_split (option_parser->optional_argument_str0_, ',');
+           for (vsize i = 0; i < components.size (); i++)
+             add_output_format (components[i]);
+         }
          break;
 
        case 'H':