From a657051a1f3be6e6b3bee3647857bdba3c0b943e Mon Sep 17 00:00:00 2001
From: Neil Puttock <n.puttock@gmail.com>
Date: Thu, 18 Aug 2011 00:25:14 +0100
Subject: [PATCH] Complete removal of unused optarg in
 ly:stencil-combine-at-edge.

---
 ...adding-indicators-to-staves-which-get-split-after-a-break.ly | 2 +-
 .../marking-notes-of-spoken-parts-with-a-cross-on-the-stem.ly   | 2 +-
 lily/stencil-scheme.cc                                          | 2 +-
 ly/arabic.ly                                                    | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Documentation/snippets/adding-indicators-to-staves-which-get-split-after-a-break.ly b/Documentation/snippets/adding-indicators-to-staves-which-get-split-after-a-break.ly
index 8557a8a611..8267f547c3 100644
--- a/Documentation/snippets/adding-indicators-to-staves-which-get-split-after-a-break.ly
+++ b/Documentation/snippets/adding-indicators-to-staves-which-get-split-after-a-break.ly
@@ -49,7 +49,7 @@ splitStaffBarLine = {
         (ly:bar-line::print grob)
         X RIGHT
         (grob-interpret-markup grob splitStaffBarLineMarkup)
-        0 0))
+        0))
   \break
 }
 
diff --git a/Documentation/snippets/marking-notes-of-spoken-parts-with-a-cross-on-the-stem.ly b/Documentation/snippets/marking-notes-of-spoken-parts-with-a-cross-on-the-stem.ly
index 18b52b36a6..de62cfc023 100644
--- a/Documentation/snippets/marking-notes-of-spoken-parts-with-a-cross-on-the-stem.ly
+++ b/Documentation/snippets/marking-notes-of-spoken-parts-with-a-cross-on-the-stem.ly
@@ -32,7 +32,7 @@ speakOn = {
               (grob-interpret-markup grob
                                     (markup #:center-align #:fontsize -4
                                             #:musicglyph "noteheads.s2cross"))
-              -2.3 0))))
+              -2.3))))
 }
 
 speakOff = {
diff --git a/lily/stencil-scheme.cc b/lily/stencil-scheme.cc
index 9526e5cc2e..629c76c98b 100644
--- a/lily/stencil-scheme.cc
+++ b/lily/stencil-scheme.cc
@@ -92,7 +92,7 @@ LY_DEFINE (ly_stencil_empty_p, "ly:stencil-empty?",
 }
 
 LY_DEFINE (ly_stencil_combine_at_edge, "ly:stencil-combine-at-edge",
-           4, 2, 0, (SCM first, SCM axis, SCM direction,
+           4, 1, 0, (SCM first, SCM axis, SCM direction,
                      SCM second,
                      SCM padding),
            "Construct a stencil by putting @var{second} next to @var{first}."
diff --git a/ly/arabic.ly b/ly/arabic.ly
index 3ff4029fd6..1f6792c9ce 100644
--- a/ly/arabic.ly
+++ b/ly/arabic.ly
@@ -25,7 +25,7 @@ dwn = {
   (ly:stencil-combine-at-edge
     (ly:accidental-interface::print grob) Y UP
     (grob-interpret-markup grob (markup #:line
-          (#:fontsize -1 (#:musicglyph "flags.ugrace")))) -1.3 0))
+          (#:fontsize -1 (#:musicglyph "flags.ugrace")))) -1.3))
 }
 
 %
-- 
2.39.5