wrapped the output of gfan --help

mahrud · Oct 19, 2024 · f25618d · f25618d
1 parent 2866d6e
commit f25618d
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/M2/Macaulay2/packages/gfanInterface.m2 b/M2/Macaulay2/packages/gfanInterface.m2
@@ -2540,9 +2540,10 @@ gfanFunctions = hashTable {
 	gfanTropicalWeilDivisor => "gfan _tropicalweildivisor" -- v0.4
 }
 
+wrap' = (n, str) -> stack apply(lines str, wrap_n)
 gfanHelp = functionStr -> PRE TT(
     if gfanProgram === null then gfanProgram = findProgram("gfan", "gfan --help", RaiseError => false);
-    if gfanProgram =!= null then runGfanCommandCaptureError(functionStr, hashTable {"help" => true}, "") else {})
+    if gfanProgram =!= null then wrap'_100 runGfanCommandCaptureError(functionStr, hashTable {"help" => true}, "") else {})
 
 doc ///
 	Key