diff --git a/lib/chibi/snow/utils.scm b/lib/chibi/snow/utils.scm
index 7f437175..800bc5af 100644
--- a/lib/chibi/snow/utils.scm
+++ b/lib/chibi/snow/utils.scm
@@ -57,7 +57,7 @@
 (define (version-split str)
   (if str
       (map (lambda (x) (or (string->number x) x))
-        (string-split str #\.))
+        (string-split str (string->char-set "._")))
       '()))
 
 (define (version-compare a b)
diff --git a/lib/chibi/snow/utils.sld b/lib/chibi/snow/utils.sld
index be22a815..6ae87890 100644
--- a/lib/chibi/snow/utils.sld
+++ b/lib/chibi/snow/utils.sld
@@ -11,6 +11,7 @@
           (scheme write)
           (scheme process-context)
           (srfi 1)
+          (chibi char-set)
           (chibi net http)
           (chibi pathname)
           (chibi string)