Rietveld Code Review Tool
Help | Bug tracker | Discussion group | Source code | Sign in
(394)

Unified Diff: Documentation/ly-examples/aucun-snippet.ly

Issue 5341049: Issue 2024: Let #{ ... #} pass its $ handling to environment cloning (Closed)
Patch Set: Ran convert-ly on scm/*.scm, just a single character changed. Created 12 years, 4 months ago
Use n/p to move between diff chunks; N/P to move between comments. Please Sign in to add in-line comments.
Jump to:
View side-by-side diff with in-line comments
Download patch
« no previous file with comments | « Documentation/ja/usage/running.itely ('k') | Documentation/ly-examples/bach-bwv610.ly » ('j') | no next file with comments »
Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
Index: Documentation/ly-examples/aucun-snippet.ly
diff --git a/Documentation/ly-examples/aucun-snippet.ly b/Documentation/ly-examples/aucun-snippet.ly
index 3dd1a642edbf2487afd5a8cf6973d9e5afa860b2..9fb71c8c085b7326f221a36583d0d4e04effcdde 100644
--- a/Documentation/ly-examples/aucun-snippet.ly
+++ b/Documentation/ly-examples/aucun-snippet.ly
@@ -1,4 +1,4 @@
-\version "2.14.0"
+\version "2.15.18"
\include "example-header.ily"
\paper {
@@ -136,21 +136,21 @@ thick y-factor offset)
pair?)
#{
\once \override Voice.Stem #'text = \markup {
- \postscript #(let ((x-off (car $offset))
- (y-off (cdr $offset)))
+ \postscript #(let ((x-off (car offset))
+ (y-off (cdr offset)))
(string-append
- (ly:number->string (car $offset)) " " (ly:number->string (cdr $offset)) "
+ (ly:number->string (car offset)) " " (ly:number->string (cdr offset)) "
translate "
- (ly:number->string $angle) " rotate "
+ (ly:number->string angle) " rotate "
(ly:number->string (- x-off)) " "
(ly:number->string (- y-off)) " translate 0 setlinewidth "
- (ly:number->string (- x-off $len-left)) " " (ly:number->string (+ y-off
-$thick)) " moveto "
- (ly:number->string (- x-off $len-left)) " " (ly:number->string y-off)
- " " (ly:number->string $thick) "
+ (ly:number->string (- x-off len-left)) " " (ly:number->string (+ y-off
+thick)) " moveto "
+ (ly:number->string (- x-off len-left)) " " (ly:number->string y-off)
+ " " (ly:number->string thick) "
90 270 arc "
- (ly:number->string (+ x-off $len-right)) " " (ly:number->string y-off)
- " " (ly:number->string $thick) "
+ (ly:number->string (+ x-off len-right)) " " (ly:number->string y-off)
+ " " (ly:number->string thick) "
270 90 arc "
" gsave fill grestore stroke")) }
@@ -162,8 +162,8 @@ $thick)) " moveto "
(ly:stencil-add
sten1
(ly:stencil-translate sten2
- (cons 0 (+ (* $y-factor (cdr extent1))
- (* (- 1 $y-factor) (car extent1))))))))
+ (cons 0 (+ (* y-factor (cdr extent1))
+ (* (- 1 y-factor) (car extent1))))))))
#})
« no previous file with comments | « Documentation/ja/usage/running.itely ('k') | Documentation/ly-examples/bach-bwv610.ly » ('j') | no next file with comments »

Powered by Google App Engine
RSS Feeds Recent Issues | This issue
This is Rietveld f62528b