We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 63538f2 commit c916d59Copy full SHA for c916d59
lilygabc/lyrics.scm
@@ -1,6 +1,7 @@
1
;; processing lyrics
2
3
(define-module (lilygabc lyrics)
4
+ #:use-module (ice-9 optargs)
5
#:use-module (ice-9 regex)
6
#:use-module (srfi srfi-1)
7
#:use-module (srfi srfi-26))
@@ -84,8 +85,7 @@
84
85
(formatting-inner '() str '()))
86
87
;; removes curly braces except those inside <v></v> tags
-(export remove-braces)
88
-(define* (remove-braces str #:optional (in-verbatim #f))
+(define*-public (remove-braces str #:optional (in-verbatim #f))
89
(let* ((tag (if in-verbatim "</v>" "<v>"))
90
(tag-i (string-contains str tag))
91
(subject
0 commit comments