X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fsafe-lily.scm;h=f3e0b98280f59007855c184002443cd10a47441f;hb=bc3062dd8a07c51e074ba45e2718e1331a1e3a42;hp=bd5a10b7b73a73f8a96e6d6931d94c58279e642a;hpb=b7a0cffbf9d1069860368f289a5b50e9d1d90ba8;p=lilypond.git diff --git a/scm/safe-lily.scm b/scm/safe-lily.scm index bd5a10b7b7..f3e0b98280 100644 --- a/scm/safe-lily.scm +++ b/scm/safe-lily.scm @@ -1,6 +1,6 @@ ;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; Copyright (C) 2004--2009 Han-Wen Nienhuys +;;;; Copyright (C) 2004--2015 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 @@ -15,7 +15,7 @@ ;;;; You should have received a copy of the GNU General Public License ;;;; along with LilyPond. If not, see . -(map +(for-each (lambda (sym) (set! safe-objects (cons (cons sym (primitive-eval sym)) safe-objects))) @@ -41,10 +41,10 @@ ly:duration-dot-count ly:duration-factor ly:duration-log + ly:duration-scale ly:duration