From a5f035237d1086d466c474ad985a99442ac6860d Mon Sep 17 00:00:00 2001 From: Nat Quayle Nelson Date: Wed, 15 Dec 2021 17:56:56 -0700 Subject: [PATCH] don't put CONT'D in conversion dialogue name --- src/hollywoo/FountainConversions.kiss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/hollywoo/FountainConversions.kiss b/src/hollywoo/FountainConversions.kiss index 7c54f6a..4b33dde 100644 --- a/src/hollywoo/FountainConversions.kiss +++ b/src/hollywoo/FountainConversions.kiss @@ -33,7 +33,7 @@ (whenLet [(Some _) (indexOf name "(${tag}")] (return false))) (and (isUpperCase name) {(stream.dropWhitespace) !(stream.isEmpty)})) ->stream - (let [name (whenLet [(Some name) (stream.takeLine)] name) + (let [name (whenLet [(Some name) (stream.takeLine)] (.trim (name.replace "(CONT'D)" ""))) &mut output ""] (loop (let [wryly (ifLet [(Some w) (stream.takeBetween "(" ")\n")] w "")