X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fmusic-functions.scm;h=9c36ceaf4d4c51d3097797256c9e195c157ad330;hb=bc6c6fe30a9dbc559a23d510269e1a5f51e02eff;hp=fa3d98b53f9334f155838c236f79f12802935895;hpb=b5da1d4ae099abb396a2323dd08a3ce4b7603eb1;p=lilypond.git

diff --git a/scm/music-functions.scm b/scm/music-functions.scm
index fa3d98b53f..9c36ceaf4d 100644
--- a/scm/music-functions.scm
+++ b/scm/music-functions.scm
@@ -1699,7 +1699,7 @@ on the same staff line."
           (cons #f (not (or (equal? acc key-acc)
                             (and (equal? entrybn barnum) (equal? entrymp measurepos)))))))))
 
-(define-public accidental-styles
+(define-session-public accidental-styles
   ;; An alist containing specification for all accidental styles.
   ;; Each accidental style needs three entries for the context properties
   ;; extraNatural, autoAccidentals and autoCautionaries.