X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=lily%2Fguile-init.cc;h=5f1bb6e27fb6487f8e2d71606d4a1561dce9ba41;hb=0129fb74b0957a277e6eb01f89046e1f46bf7777;hp=77fd7c59f30630ddf4eccc8dc22f9ae0769c399e;hpb=adaa7aecab8595596fc6505402b40a37a04716e6;p=lilypond.git diff --git a/lily/guile-init.cc b/lily/guile-init.cc index 77fd7c59f3..5f1bb6e27f 100644 --- a/lily/guile-init.cc +++ b/lily/guile-init.cc @@ -1,10 +1,21 @@ -/* - guile-init.cc -- implement GUILE init routines. - - source file of the GNU LilyPond music typesetter - - (c) 2006 Han-Wen Nienhuys +/* + This file is part of LilyPond, the GNU music typesetter. + + Copyright (C) 2006--2011 Han-Wen Nienhuys + + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ #include "lily-guile.hh" @@ -41,7 +52,7 @@ ly_init_ly_module (void *) progress_indication ("]\n"); } - scm_primitive_load_path (scm_makfrom0str ("lily.scm")); + scm_primitive_load_path (scm_from_locale_string ("lily.scm")); } SCM global_lily_module;