Switch to https urls

[factor.git] / extra / images / http / http.factor

diff --git a/extra/images/http/http.factor b/extra/images/http/http.factor
index 6ab0bc657144652185ea8e48075be6693b6d3b9f..d1a9c621fa546490ca466d469aded8ba197e2903 100644 (file)
--- a/extra/images/http/http.factor
+++ b/extra/images/http/http.factor
@@ -1,5 +1,5 @@
 ! Copyright (C) 2009 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
+! See https://factorcode.org/license.txt for BSD license.
 USING: accessors combinators.short-circuit http.client
 images.loader images.loader.private images.viewer io.pathnames
 kernel namespaces opengl present sequences strings urls ;
@@ -20,7 +20,7 @@ PRIVATE>
     gl-scale-factor get-global [ 2.0 = >>2x? ] when* ;
 
 M: string set-image
-    dup { [ "http://" head? ] [ "https://" head? ] } 1||
+    dup { [ "https://" head? ] [ "https://" head? ] } 1||
     [ load-http-image ] [ load-image ] if >>image ;
 
 M: url set-image