added >upper to push-utf8 to conform with RFC 3986 section 2.1. recommendation

2009-07-03 08:18:49 +02:00 · 2009-07-03 08:18:49 +02:00 · bac9045e19
parent 7f8c0d1e25
commit bac9045e19
1 changed files with 1 additions and 1 deletions
--- a/basis/urls/encoding/encoding.factor
+++ b/basis/urls/encoding/encoding.factor
@ -37,7 +37,7 @@ IN: urls.encoding

 : push-utf8 ( ch -- )
    1string utf8 encode
-    [ CHAR: % , >hex 2 CHAR: 0 pad-head % ] each ;
+    [ CHAR: % , >hex >upper 2 CHAR: 0 pad-head % ] each ;

 PRIVATE>