X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fscript.scm;h=c8eb8b39b9a9f415bdd93c55ab9ca8cdd76016d8;hb=HEAD;hp=6cfecbe89c791720d39581b28be827ea2a17decd;hpb=9e781b7dc83b60a543ce218aa1a5f139f74c760f;p=lilypond.git

diff --git a/scm/script.scm b/scm/script.scm
index 6cfecbe89c..c8eb8b39b9 100644
--- a/scm/script.scm
+++ b/scm/script.scm
@@ -1,6 +1,6 @@
 ;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; Copyright (C) 2000--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; Copyright (C) 2000--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
 ;;;;
 ;;;; LilyPond is free software: you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
@@ -110,6 +110,13 @@
         (script-stencil . (feta . ("halfopen" . "halfopen")))
         (direction . ,UP)))
 
+    ("halfopenvertical"
+     . (
+        (avoid-slur . outside)
+        (padding . 0.20)
+        (script-stencil . (feta . ("halfopenvertical" . "halfopenvertical")))
+        (direction . ,UP)))
+
 
     ("ictus"
      . (
@@ -270,14 +277,17 @@
         (script-stencil . (feta . ("dstaccatissimo" . "ustaccatissimo")))
         (padding . 0.20)
         (skyline-horizontal-padding . 0.10)
-        (side-relative-direction . ,DOWN)))
+        (side-relative-direction . ,DOWN)
+        (toward-stem-shift . 1.0)
+        (toward-stem-shift-in-column . 0.0)))
     ("staccato"
      . (
         (script-stencil . (feta . ("staccato" . "staccato")))
         (side-relative-direction . ,DOWN)
         (quantize-position . #t)
         (avoid-slur . inside)
-        (toward-stem-shift . 0.5)
+        (toward-stem-shift . 1.0)
+        (toward-stem-shift-in-column . 0.0)
         (padding . 0.20)
         (skyline-horizontal-padding . 0.10)
         (script-priority . -100)))