]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/paper.scm
Doc: NR - using \unfoldRepeat with \addQuote
[lilypond.git] / scm / paper.scm
index c488db1ac99d57b709e04ffecaf2a65404500965..438cf80975d65f41a63fa0459e44219f6cd6f576 100644 (file)
 (define-safe-public (set-global-staff-size sz)
   "Set the default staff size, where SZ is thought to be in PT."
   (let* ((current-mod (current-module))
-         (parser (eval 'parser current-mod))
-         (pap (ly:parser-lookup parser '$defaultpaper))
+         (pap (ly:parser-lookup '$defaultpaper))
          (in-layout? (or (module-defined? current-mod 'is-paper)
                          (module-defined? current-mod 'is-layout)))