patch::: 1.5.5.jcn1

[lilypond.git] / flower / string-convert.cc

diff --git a/flower/string-convert.cc b/flower/string-convert.cc
index e751cc71d839197e398daec5bfeb6c7dffe8f214..d44857c423976bfbc333c221191cc688d08e4ee6 100644 (file)
--- a/flower/string-convert.cc
+++ b/flower/string-convert.cc
@@ -343,3 +343,9 @@ String_convert::long_str (long l)
   sprintf (s,"%ld", l);
   return s;
 }
+
+String
+String_convert::pad_to (String s, int n)
+{
+  return s + to_str (' ' , (n - s.length_i ()) >? 0);
+}