]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/repeat-acknowledge-engraver.cc
Doc-es: update Included/Generating.
[lilypond.git] / lily / repeat-acknowledge-engraver.cc
index 779323e07d39a2fc8ce1bc244ffe9c80f3e07d0d..67477b1f01df6cd589a7d24559132d1e12f64466 100644 (file)
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 2000--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  Copyright (C) 2000--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
@@ -85,13 +85,14 @@ Repeat_acknowledge_engraver::process_music ()
   while (scm_is_pair (cs))
     {
       SCM command = scm_car (cs);
-      if (command == ly_symbol2scm ("start-repeat"))
+      if (scm_is_eq (command, ly_symbol2scm ("start-repeat")))
         start = true;
-      else if (command == ly_symbol2scm ("end-repeat"))
+      else if (scm_is_eq (command, ly_symbol2scm ("end-repeat")))
         end = true;
-      else if (command == ly_symbol2scm ("segno-display"))
+      else if (scm_is_eq (command, ly_symbol2scm ("segno-display")))
         segno = true;
-      else if (scm_is_pair (command) && scm_car (command) == ly_symbol2scm ("volta"))
+      else if (scm_is_pair (command)
+               && scm_is_eq (scm_car (command), ly_symbol2scm ("volta")))
         volta_found = true;
       cs = scm_cdr (cs);
     }