| Index: scm/lily-library.scm |
| diff --git a/scm/lily-library.scm b/scm/lily-library.scm |
| index 2270726902fdee0b4ae2c1993ac201e45f4fcc68..c5bf8cc59de12066e1f4bbf7e6aa88e321ef883e 100644 |
| --- a/scm/lily-library.scm |
| +++ b/scm/lily-library.scm |
| @@ -786,6 +786,12 @@ as rectangular coordinates @ode{(x-length . y-length)}." |
| (define-public (string-startswith s prefix) |
| (equal? prefix (substring s 0 (min (string-length s) (string-length prefix))))) |
| +(define-public (remove-whitespace strg) |
| +"Remove characters satisfying @code{char-whitespace?} from string @var{strg}" |
| + (string-delete |
| + strg |
| + char-whitespace?)) |
| + |
| (define-public (string-encode-integer i) |
| (cond |
| ((= i 0) "o") |
