diff --git a/projects/hollywoo/src/hollywoo/FountainConversions.kiss b/projects/hollywoo/src/hollywoo/FountainConversions.kiss
index 7c54f6a4..4b33ddec 100644
--- a/projects/hollywoo/src/hollywoo/FountainConversions.kiss
+++ b/projects/hollywoo/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 "")