diff --git a/main.rkt b/main.rkt
index d827945..5032361 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)