Fix memory leak of an Output_def.

(cherry picked from commit 5ea3f07e4d8a70a37d00e25b87db60cd50f4e06c)

diff --git a/lily/book.cc b/lily/book.cc
index 001d647215372201007f87c688ef46cc72c1a0ee..48a5a4c5524c49dbfd95b0977b9104872ff69bff 100644 (file)
--- a/lily/book.cc
+++ b/lily/book.cc
@@ -268,6 +268,7 @@ Book::process (Output_def *default_paper,
       paper_book->paper_->parent_ = parent_part->paper_;
     }
   paper_book->header_ = header_;
+  scaled_bookdef->unprotect ();
 
   if (scm_is_pair (bookparts_))
     {