From 734cfdd53d12e40d934158a47885dabdd538aa2b Mon Sep 17 00:00:00 2001
From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Thu, 26 Jul 2007 16:29:34 -0700
Subject: [PATCH] thinko: it's ly:get-option, not ly:option.

---
 scm/lily.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scm/lily.scm b/scm/lily.scm
index 6f2f09d2e6..bddf997764 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -416,7 +416,7 @@ The syntax is the same as `define*-public'."
     (ly:progress "\nWriting timing to ~a..." outname)
     (format (open-file outname "w")
 	    "time: ~a\ncells: ~a\n"
-	    (if (ly:option 'dump-cpu-profile)
+	    (if (ly:get-option 'dump-cpu-profile)
 		(car diff)
 		0)
 	    (cadr diff)
-- 
2.39.5