steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

libs.xkcd: fix regexp for not needing \ all over

locals-and-roots
Doug Coleman 2016-06-27 11:30:12 -07:00
parent ec17b254e6
commit 19510ea5a7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
libs/xkcd/xkcd.factor
View File

@ -13,7 +13,7 @@ PRIVATE<
: comic-image ( url -- image ) : comic-image ( url -- image )
http-get nip 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 ; first-match >string load-http-image ;
: comic-image. ( url -- ) : comic-image. ( url -- )