Fix server.

This commit is contained in:
Seán Healy
2026-10-31 19:02:01 +00:00
parent c47d94bda0
commit d54e9e4bef

View File

@@ -40,7 +40,7 @@ script_name(ScriptName) -->
{atom_codes(ScriptName, [FirstChar|RemainingChars])}. {atom_codes(ScriptName, [FirstChar|RemainingChars])}.
script_name_chars([Char|Chars]) --> script_name_chars([Char|Chars]) -->
[Char], [Char],
{char_type(Char, alnum); Char = '_'}, {char_type(Char, alnum); Char = '_'; Char = '-'},
script_name_chars(Chars). script_name_chars(Chars).
script_name_chars([]) --> []. script_name_chars([]) --> [].
condition(Condition, Level) --> condition(Condition, Level) -->