]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/paper-book.cc
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / lily / paper-book.cc
index fad78957fd75092ccdf3a1e32588b6f7343c5e18..c17ed576f1895c0a91febb29164ea9987dda1b0f 100644 (file)
@@ -33,8 +33,6 @@
 #include "ly-module.hh"
 #include "lily-imports.hh"
 
-using std::string;
-using std::vector;
 
 Paper_book::Paper_book ()
 {
@@ -55,7 +53,7 @@ Paper_book::~Paper_book ()
 {
 }
 
-const char Paper_book::type_p_name_[] = "ly:paper-book?";
+const char * const Paper_book::type_p_name_ = "ly:paper-book?";
 
 SCM
 Paper_book::mark_smob () const
@@ -516,7 +514,7 @@ Paper_book::get_system_specs ()
               SCM footnotes = get_footnotes (unsmob<Stencil> (t)->expr ());
               ps->set_property ("footnotes", footnotes);
               ps->set_property ("is-title", SCM_BOOL_T);
-              if (list == texts)
+              if (scm_is_eq (list, texts))
                 first = ps;
               else
                 {