Evaluated rename split_on_formatting split_on_formatting_FUCKYOU

2023-01-08 17:04:42 -08:00
parent 52dca52311
commit 5c9e4f2660
2 changed files with 1 additions and 1 deletions
--- a/procs/ff93d9d9f418fcc87a0f804f5d284ab3c4a4b530
+++ b/procs/ff93d9d9f418fcc87a0f804f5d284ab3c4a4b530
@ -0,0 +1 @@
+str {set ret [list]; while {[string length $str]} {regexp {^(((\d{0,2})(,(\d{0,2}))?)?||||)?([^]*)(.*)} $str {} f {} {} {} {} t r; if {$f eq ""} {set f }; lappend ret $f $t; set str $r}; return $ret}
				`@ -0,0 +1 @@`
				`str {set ret [list]; while {[string length $str]} {regexp {^(((\d{0,2})(,(\d{0,2}))?)?\|\|\|\|)?([^])(.)} $str {} f {} {} {} {} t r; if {$f eq ""} {set f }; lappend ret $f $t; set str $r}; return $ret}`