X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fgrob-interface.cc;h=edda80ad2dfce020650200aa941f7844d277450c;hb=b5c2ba0cc01c8edf1d5fb25968ca7345b174957c;hp=c47937db0f2737ef292f8a5ffba97583a4b5c73e;hpb=25190a4637753e6439c445d2d4fe9323b7945d32;p=lilypond.git diff --git a/lily/grob-interface.cc b/lily/grob-interface.cc index c47937db0f..edda80ad2d 100644 --- a/lily/grob-interface.cc +++ b/lily/grob-interface.cc @@ -1,9 +1,20 @@ /* - grob-interface.cc -- implement graphic objects interface + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 2002--2010 Han-Wen Nienhuys - (c) 2002--2006 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 "grob-interface.hh" @@ -26,10 +37,10 @@ SCM add_interface (char const *cxx_name, lispy_name += suffix; SCM s = ly_symbol2scm (lispy_name.c_str ()); - SCM d = scm_makfrom0str (descr); + SCM d = scm_from_locale_string (descr); SCM l = parse_symbol_list (vars); - ly_add_interface (s, d, l); + internal_add_interface (s, d, l); return s; }