From 21403e6ca9e4d61660fd35250f78c4f0093e930e Mon Sep 17 00:00:00 2001
From: Hans Dijkema <hans@dijkewijk.nl>
Date: Thu, 12 Mar 2026 11:01:17 +0100
Subject: [PATCH] Support '.' in sections and fields

---
 main.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/main.rkt b/main.rkt
index f2a8843..d827945 100644
--- a/main.rkt
+++ b/main.rkt
@@ -84,8 +84,8 @@
 (define (file->ini file*)
   (let* ((file (get-ini-file file*))
 	 (lines (if (file-exists? file) (file->lines file) '()))
-         (re-section #px"^\\[([a-zA-Z0-9_-]+)\\]$")
-         (re-keyval #px"^([a-zA-Z0-9_-]+)[=](.*)$")
+         (re-section #px"^\\[([a-zA-Z0-9_-.]+)\\]$")
+         (re-keyval #px"^([a-zA-Z0-9_-.]+)[=](.*)$")
          (re-comment #px"^[;](.*)$"))
     (letrec ((f (lambda (sections section lines)
                   (if (null? lines)