Skip multiline comments when checking if test/example is capturable

Macaulay2 · Oct 31, 2024 · d110798 · d110798
1 parent eed5da6
commit d110798
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/M2/Macaulay2/m2/examples.m2 b/M2/Macaulay2/m2/examples.m2
@@ -130,8 +130,8 @@ isCapturable = (inputs, pkg, isTest) -> (
     -- alternatively, no-capture-flag can be used with an example or test
     if argumentMode & NoCapture =!= 0 or match("no-capture-flag", inputs) then return false;
     -- strip commented segments first
-    inputs = replace("--.*$", "",       inputs);
-    inputs = replace("-\\*.*?\\*-", "", inputs);
+    inputs = replace("--.*$", "",            inputs);
+    inputs = replace("-\\*(.|\n)*?\\*-", "", inputs);
     -- TODO: remove this when the effects of capture on other packages is reviewed
     (isTest or match({"FirstPackage", "Macaulay2Doc"},            pkg#"pkgname"))
     and not match({