iitalics
/
talircd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix handling non-integer arguments to +l

This commit is contained in:
tali 2024-01-31 11:50:17 -05:00
parent 5c43d23dd5
commit 41b7fde963
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/irc/mode.ml
View File

@ -227,7 +227,7 @@ module Parse = struct
begin begin
try match m, arg with try match m, arg with
| `l, `set n -> | `l, `set n ->
let n = int_of_string n in let n = Option.get (int_of_string_opt n) in
if n <= 0 then invalid_arg "limit <= 0"; if n <= 0 then invalid_arg "limit <= 0";
{ acc with chan_limit = Some (`set n) }, args { acc with chan_limit = Some (`set n) }, args
| `l, `unset -> | `l, `unset ->