diff --git a/extra/tzinfo/tzinfo.factor b/extra/tzinfo/tzinfo.factor
index 15fa7a5bb8..c1f0d25eae 100644
--- a/extra/tzinfo/tzinfo.factor
+++ b/extra/tzinfo/tzinfo.factor
@@ -108,3 +108,6 @@ PRIVATE>
 
 : normalize ( timestamp tzinfo -- timestamp' )
     [ instant convert-timezone ] [ from-utc ] bi* ;
+
+: load-tzinfo ( name -- tzinfo )
+    "/usr/share/zoneinfo/" prepend file>tzinfo ;