X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fsafe-lily.scm;h=25209e5a0b698e412ac53220851b0f12d7a6adb0;hb=8108cbe2a26c25f7f43464589eeea692f86e8c65;hp=894680ffc3e08d70c761bf29f577dc56a412625d;hpb=a6bd229f7fe1dc4a03478e14ccc0c0c66b225061;p=lilypond.git diff --git a/scm/safe-lily.scm b/scm/safe-lily.scm index 894680ffc3..25209e5a0b 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--2012 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