X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fsafe-lily.scm;h=f3e0b98280f59007855c184002443cd10a47441f;hb=HEAD;hp=6c2917890e8a3c0003ed2f8b8c921229986e829c;hpb=d4ba37c298813e0f7008ef8388e126c34d8f8dd3;p=lilypond.git

diff --git a/scm/safe-lily.scm b/scm/safe-lily.scm
index 6c2917890e..f3e0b98280 100644
--- a/scm/safe-lily.scm
+++ b/scm/safe-lily.scm
@@ -1,10 +1,21 @@
-;;;; safe-lily.scm -- 
+;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; source file of the GNU LilyPond music typesetter
-;;;; 
-;;;; (c) 2004--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; Copyright (C) 2004--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;;
+;;;; 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 <http://www.gnu.org/licenses/>.
 
-(map
+(for-each
  (lambda (sym)
    (set! safe-objects (cons (cons sym (primitive-eval sym))
                             safe-objects)))
@@ -30,10 +41,10 @@
    ly:duration-dot-count
    ly:duration-factor
    ly:duration-log
+   ly:duration-scale
    ly:duration<?
    ly:duration?
    ly:error
-   ly:export
    ly:font-get-glyph
    ly:font-design-size
    ly:font-file-name
@@ -43,7 +54,6 @@
    ly:format-output
    ly:get-all-function-documentation
    ly:get-all-translators
-   ly:get-glyph
    ly:get-option
    ly:grob-alist-chain
    ly:grob-default-font
@@ -92,6 +102,7 @@
    ly:number->string
    ly:option-usage
    ly:output-def-clone
+   ly:output-def-lookup
    ly:output-def-scope
    ly:output-description
    ly:paper-book?
@@ -100,7 +111,6 @@
    ly:paper-get-font
    ly:paper-get-number
    ly:paper-system?
-   ly:output-def-lookup
    ly:parser-parse-string
    ly:pitch-alteration
    ly:pitch-diff
@@ -112,22 +122,23 @@
    ly:pitch-transpose
    ly:pitch<?
    ly:pitch?
+   ly:position-on-line?
    ly:round-filled-box
    ly:run-translator
    ly:set-option
-   ly:set-point-and-click
    ly:spanner-broken-into
    ly:spanner-bound
    ly:spanner?
+   ly:staff-symbol-line-thickness
    ly:stencil-add
    ly:stencil-aligned-to
    ly:stencil-combine-at-edge
    ly:stencil-expr
    ly:stencil-extent
+   ly:stencil-stack
    ly:stencil-translate
    ly:stencil-translate-axis
    ly:stencil?
-   ly:text-dimension
    ly:translator-description
    ly:translator-name
    ly:translator?
@@ -143,7 +154,6 @@
    ;;$defaultlayout
 
    ly:accidental-interface::print
-   ly:ambitus::print
    ly:arpeggio::print
    ly:arpeggio::brew-chord-bracket
    ly:bar-line::print
@@ -169,7 +179,6 @@
    ly:multi-measure-rest::print
    ly:multi-measure-rest::set-spacing-rods
    ly:note-head::print
-;;   ly:note-head::brew-ez-stencil
    ly:ottava-bracket::print
    ly:paper-column::print
    ly:percent-repeat-item-interface::beat-slash
@@ -187,7 +196,6 @@
    ly:stem::height
    ly:stem::offset-callback
    ly:stem::print
-   ly:stem-tremolo::height
    ly:stem-tremolo::print
    ly:sustain-pedal::print
    ly:system-start-delimiter::print