diff --git a/main.rkt b/main.rkt
index be5c9bc..d038eee 100644
--- a/main.rkt
+++ b/main.rkt
@@ -91,8 +91,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)