stable 2007.08.20 10:21

1 files changed, 12 insertions, 0 deletions

diff --git a/tex/context/base/l-string.lua b/tex/context/base/l-string.lua
index 9b594ff8a..9940de9b2 100644
--- a/tex/context/base/l-string.lua
+++ b/tex/context/base/l-string.lua
@@ -305,3 +305,15 @@ end
 --~ print(is_number("+0.1"))
 --~ print(is_number("-.1"))
 --~ print(is_number("+.1"))
+
+function string:split_settings() -- no {} handling, see l-aux for lpeg variant
+    if self:find("=") then
+        local t = { }
+        for k,v in self:gmatch("(%a+)=([^%,]*)") do
+            t[k] = v
+        end
+        return t
+    else
+        return nil
+    end
+end