diff --git a/orchestrallily.ily b/orchestrallily.ily
index 37194ec90f45f5aec1a5c4d7a6194173d8beb2ea..154df4f472d7449f8985a17bf7e1ac2be669aaaa 100644
--- a/orchestrallily.ily
+++ b/orchestrallily.ily
@@ -1238,6 +1238,14 @@ addArticulation = #(define-music-function (parser location type music)
                 (add-articulation music type))
 
 
+#(define-markup-command (pad-y layout props amount arg)
+  (number? markup?)
+  #:category align
+  (let* ((m (interpret-markup layout props arg))
+         (x (ly:stencil-extent m X))
+         (y (ly:stencil-extent m Y)))
+    (ly:make-stencil (ly:stencil-expr m) x 
+		     (interval-widen y amount))))
 
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%