release: 0.1.39

[lilypond.git] / lily / performance.cc

diff --git a/lily/performance.cc b/lily/performance.cc
index 8d05ec325dd45efa914ca5b81767110463a687f4..aaf926965fe23b07d779a40bd3239bd1a204cf3b 100644 (file)
--- a/lily/performance.cc
+++ b/lily/performance.cc
@@ -115,8 +115,18 @@ Performance::process()
 
   String out=midi_l_->outfile_str_;
   if (out.empty_b ())
-    out = default_out_str_ + ".midi";
-
+    {
+      
+      out = default_outname_base_global;
+      int def = midi_l_->get_next_default_count ();
+      if (def)
+       {
+         out += "-" + String(def);
+       }
+
+      out += ".midi";
+    }
+  
   Midi_stream midi_stream (out);
   *mlog << _("MIDI output to ") << out<< " ..." << endl;