diff --git a/libs/xkcd/xkcd.factor b/libs/xkcd/xkcd.factor
index d683bdc750..bae687f3f0 100644
--- a/libs/xkcd/xkcd.factor
+++ b/libs/xkcd/xkcd.factor
@@ -13,7 +13,7 @@ PRIVATE<
 
 : comic-image ( url -- image )
     http-get nip
-    R[[ http:\\/\\/imgs\.xkcd\.com\\/comics\\/[^\.]+\.(png|jpg)]]
+    R`http://imgs\.xkcd\.com/comics/[^\.]+\.(png|jpg)
     first-match >string load-http-image ;
 
 : comic-image. ( url -- )