Evaluated rename split_on_formatting_FUCKYOU split_on_formatting

2023-01-08 17:03:33 -08:00
parent 2131e7500c
commit 52dca52311
2 changed files with 1 additions and 1 deletions
--- a/procs/a07fa5b8c3bdcc395bb9e27240b191b0f767a294
+++ b/procs/a07fa5b8c3bdcc395bb9e27240b191b0f767a294
@ -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}`