X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fslur-score-parameters.cc;h=46ac1e62954be552d8c98fc24d7c363ff92db183;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=00b8effc0f05cc2100d3a08169ec3f47e81eb96d;hpb=8cab78caa0db1ba14f2e52e4c1ddbb541ea0e5cb;p=lilypond.git

diff --git a/lily/slur-score-parameters.cc b/lily/slur-score-parameters.cc
index 00b8effc0f..46ac1e6295 100644
--- a/lily/slur-score-parameters.cc
+++ b/lily/slur-score-parameters.cc
@@ -1,25 +1,34 @@
 /*
-  slur-score-paramaters.cc -- implement Slur_score_parameters
+  This file is part of LilyPond, the GNU music typesetter.
 
-  source file of the GNU LilyPond music typesetter
+  Copyright (C) 2006--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
-  (c) 2006--2009 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
+  the Free Software Foundation, either version 3 of the License, or
+  (at your option) any later version.
+
+  LilyPond is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
 
+  You should have received a copy of the GNU General Public License
+  along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
+*/
 
 #include "slur-score-parameters.hh"
 #include "grob.hh"
 
-
 Real
 get_detail (SCM alist, SCM sym)
 {
   SCM entry = scm_assq (sym, alist);
   return robust_scm2double (scm_is_pair (entry)
-			    ? scm_cdr (entry)
-			    : SCM_EOL,
-			    0.0);
+                            ? scm_cdr (entry)
+                            : SCM_EOL,
+                            0.0);
 }
 
 void
@@ -33,8 +42,6 @@ Slur_score_parameters::fill (Grob *me)
     = get_detail (details, ly_symbol2scm ("head-encompass-penalty"));
   stem_encompass_penalty_
     = get_detail (details, ly_symbol2scm ("stem-encompass-penalty"));
-  closeness_factor_
-    = get_detail (details, ly_symbol2scm ("closeness-factor"));
   edge_attraction_factor_
     = get_detail (details, ly_symbol2scm ("edge-attraction-factor"));
   same_slope_penalty_
@@ -49,6 +56,10 @@ Slur_score_parameters::fill (Grob *me)
     = get_detail (details, ly_symbol2scm ("max-slope-factor"));
   free_head_distance_
     = get_detail (details, ly_symbol2scm ("free-head-distance"));
+  gap_to_staffline_inside_
+    = get_detail (details, ly_symbol2scm ("gap-to-staffline-inside"));
+  gap_to_staffline_outside_
+    = get_detail (details, ly_symbol2scm ("gap-to-staffline-outside"));
   absolute_closeness_measure_
     = get_detail (details, ly_symbol2scm ("absolute-closeness-measure"));
   extra_object_collision_penalty_
@@ -67,4 +78,12 @@ Slur_score_parameters::fill (Grob *me)
     = get_detail (details, ly_symbol2scm ("free-slur-distance"));
   edge_slope_exponent_
     = get_detail (details, ly_symbol2scm ("edge-slope-exponent"));
+  close_to_edge_length_
+    = get_detail (details, ly_symbol2scm ("close-to-edge-length"));
+  encompass_object_range_overshoot_
+    = get_detail (details, ly_symbol2scm ("encompass-object-range-overshoot"));
+  slur_tie_extrema_min_distance_
+    = get_detail (details, ly_symbol2scm ("slur-tie-extrema-min-distance"));
+  slur_tie_extrema_min_distance_penalty_
+    = get_detail (details, ly_symbol2scm ("slur-tie-extrema-min-distance-penalty"));
 }