]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/output-def.cc
* scm/lily.scm (completize-formats): new function
[lilypond.git] / lily / output-def.cc
index 8a1c87707c7b4a0dd4561ff7c215b79544deb645..404b51280786378a9d501d11166329fb1214619c 100644 (file)
@@ -6,15 +6,15 @@
   (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
+#include "output-def.hh"
+
 #include "context-def.hh"
 #include "file-path.hh"
 #include "global-context.hh"
 #include "interval.hh"
-#include "lily-guile.hh"
 #include "ly-module.hh"
 #include "main.hh"
 #include "output-def.hh"
-#include "output-def.hh"
 #include "scm-hash.hh"
 #include "warn.hh"
 
@@ -34,9 +34,9 @@ Output_def::Output_def (Output_def const &s)
   smobify_self ();
 
   input_origin_ = s.input_origin_;
-  scope_= ly_make_anonymous_module (false);
+  scope_ = ly_make_anonymous_module (false);
   if (ly_c_module_p (s.scope_))
-    ly_import_module (scope_, s.scope_);
+    ly_module_copy (scope_, s.scope_);
 }
 
 Output_def::~Output_def ()