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

Unified Diff: scm/output-lib.scm

Issue 5626052: Gets vertical skylines from grob stencils (Closed)
Patch Set: Run astyle on c++ files Created 11 years, 7 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
« lily/skyline.cc ('K') | « scm/lily.scm ('k') | scm/output-ps.scm » ('j') | no next file with comments »
Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
Index: scm/output-lib.scm
diff --git a/scm/output-lib.scm b/scm/output-lib.scm
index af55cc8fde11557f70c010b2f827e073278275e8..5b7d441952b5fc7a6ed341b1fbfd292cb9332a83 100644
--- a/scm/output-lib.scm
+++ b/scm/output-lib.scm
@@ -574,6 +574,10 @@ and duration-log @var{log}."
(define-public (accidental-interface::calc-alteration grob)
(ly:pitch-alteration (ly:event-property (event-cause grob) 'pitch)))
+(define-public (accidental-interface::glyph-name grob)
+ (assoc-get (ly:grob-property grob 'alteration)
+ standard-alteration-glyph-name-alist))
+
(define-public cancellation-glyph-name-alist
'((0 . "accidentals.natural")))
« lily/skyline.cc ('K') | « scm/lily.scm ('k') | scm/output-ps.scm » ('j') | no next file with comments »

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