* flower

[lilypond.git] / lily / paper-book-scheme.cc

diff --git a/lily/paper-book-scheme.cc b/lily/paper-book-scheme.cc
index 811b7319dc88f93ccf62536eea2711b43c48b12a..8b5d6c866e0d30f99ec379d6ac881383f5146bac 100644 (file)
--- a/lily/paper-book-scheme.cc
+++ b/lily/paper-book-scheme.cc
@@ -4,7 +4,6 @@
   source file of the GNU LilyPond music typesetter
 
   (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
 */
 
 #include "paper-book.hh"
@@ -12,23 +11,23 @@
 #include "output-def.hh"
 
 LY_DEFINE (ly_paper_book_pages, "ly:paper-book-pages",
-         1, 0, 0, (SCM pb),
-         "Return pages in book PB.")
+          1, 0, 0, (SCM pb),
+          "Return pages in book PB.")
 {
-  return unsmob_paper_book(pb)->pages ();
+  return unsmob_paper_book (pb)->pages ();
 }
 
 LY_DEFINE (ly_paper_book_scopes, "ly:paper-book-scopes",
-         1, 0, 0, (SCM book),
-         "Return pages in layout book @var{book}.")
+          1, 0, 0, (SCM book),
+          "Return pages in layout book @var{book}.")
 {
-  Paper_book *pb = unsmob_paper_book(book);
-  SCM_ASSERT_TYPE(pb, book, SCM_ARG1, __FUNCTION__, "Paper_book");
-  
+  Paper_book *pb = unsmob_paper_book (book);
+  SCM_ASSERT_TYPE (pb, book, SCM_ARG1, __FUNCTION__, "Paper_book");
+
   SCM scopes = SCM_EOL;
   if (ly_c_module_p (pb->header_))
     scopes = scm_cons (pb->header_, scopes);
-  
+
   return scopes;
 }
 
@@ -40,8 +39,8 @@ LY_DEFINE (ly_paper_book_systems, "ly:paper-book-systems",
 }
 
 LY_DEFINE (ly_paper_book_paper, "ly:paper-book-paper",
-         1, 0, 0, (SCM pb),
-         "Return pages in book PB.")
+          1, 0, 0, (SCM pb),
+          "Return pages in book PB.")
 {
   return unsmob_paper_book (pb)->paper_->self_scm ();
 }