From fc7a880cfa76e25a4464690e23656d1d32a58a06 Mon Sep 17 00:00:00 2001
From: Carl Sorensen <c_sorensen@byu.edu>
Date: Sat, 6 Mar 2010 16:25:10 -0700
Subject: [PATCH] Add angularity to regtest and docstring for parenthesize
 markup

---
 input/regression/parenthesize-markup.ly | 12 +++++++++++-
 scm/define-markup-commands.scm          | 20 +++++++++++++++-----
 2 files changed, 26 insertions(+), 6 deletions(-)

diff --git a/input/regression/parenthesize-markup.ly b/input/regression/parenthesize-markup.ly
index 0699587ec8..89a4949585 100644
--- a/input/regression/parenthesize-markup.ly
+++ b/input/regression/parenthesize-markup.ly
@@ -12,10 +12,20 @@ The angularity of the parentheses can be adjusted.
 }
 
 \score {
-  c''^\markup {
+  \relative c'' {c^\markup {
     \parenthesize {
       \column { "A" "B" "C" }
     }
+  } c c c
+  c^\markup {
+    \override #'(angularity . 2) {
+      \override #'(width . 0.5) {
+        \parenthesize {
+          \column { "A" "B" "C" }
+        }
+      }
+    }
+  } c c c
   }
 }
 
diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm
index 4a7a6a0fdf..9240681dad 100644
--- a/scm/define-markup-commands.scm
+++ b/scm/define-markup-commands.scm
@@ -2646,7 +2646,7 @@ figured bass notation.
       stroke")
 
 (define-markup-command (eyeglasses layout props)
-  () 
+  ()
   #:category other
   "Prints out eyeglasses, indicating strongly to look at the conductor.
 @lilypond[verbatim,quote]
@@ -3165,10 +3165,20 @@ a column containing several lines of text.
 
 @lilypond[verbatim,quote]
 \\markup {
-  \\parenthesize {
-    \\column {
-      foo
-      bar
+  \\line {
+    \\parenthesize {
+      \\column {
+        foo
+        bar
+      }
+    }
+    \\override #'(angularity . 2) {
+      \\parenthesize {
+        \\column {
+          bah
+          baz
+        }
+      }
     }
   }
 }
-- 
2.39.5