X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fsafe-lily.scm;h=f3e0b98280f59007855c184002443cd10a47441f;hb=5b09c1d590c7a88f8d79a71565c905b77063f2e4;hp=8c7059d43829fdfd58dd28d81fe30060310d3d7b;hpb=0950de32403b199efc8454ca527f1201ee458417;p=lilypond.git diff --git a/scm/safe-lily.scm b/scm/safe-lily.scm index 8c7059d438..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--2010 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