Index: scripts/lilypond-invoke-editor.scm |
diff --git a/scripts/lilypond-invoke-editor.scm b/scripts/lilypond-invoke-editor.scm |
index 6658f50166dfe4d98f56d2d2aad068d4e291f864..de45663c1d4c8ec51d730eb20aad27d0eaf4ef3f 100644 |
--- a/scripts/lilypond-invoke-editor.scm |
+++ b/scripts/lilypond-invoke-editor.scm |
@@ -93,7 +93,7 @@ Options: |
(define (dissect-uri uri) |
- (let* ((match (string-match "textedit://(.*):([^:]+):([^:]+):(.*)$" uri))) |
+ (let* ((match (string-match "textedit://(.*):([0-9]+):([0-9]+):([0-9]*)$" uri))) |
(if match |
(list (unquote-uri (match:substring match 1)) |
(match:substring match 2) |