Fix card comment parsing.
This commit is contained in:
parent
a4b4ea764a
commit
9a9242f286
1 changed files with 4 additions and 1 deletions
|
@ -233,7 +233,10 @@
|
||||||
(define (convert-member-value:card v)
|
(define (convert-member-value:card v)
|
||||||
(let* ((va (string-split v))
|
(let* ((va (string-split v))
|
||||||
(v0 (car va))
|
(v0 (car va))
|
||||||
(vr (substring v (string-length v0))))
|
(vr (irregex-replace
|
||||||
|
(irregex "^ *" 'u)
|
||||||
|
(substring v (string-length v0))
|
||||||
|
"")))
|
||||||
(cons v0 vr)))
|
(cons v0 vr)))
|
||||||
|
|
||||||
;; Converts card ids to cons of two strings.
|
;; Converts card ids to cons of two strings.
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue