[Guile-commits] 01/06: http: Do not use 'eq?' to compare characters in parse-request-uri.

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit b56b944920c2a1789ae1568bb146fa71ceaa92b9
Author: Mark H Weaver <address@hidden>
Date:   Fri Sep 9 07:32:53 2016 -0400

    http: Do not use 'eq?' to compare characters in parse-request-uri.
    
    * module/web/http.scm (parse-request-uri): Use 'eqv?' to compare
    characters.
---
 module/web/http.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/web/http.scm b/module/web/http.scm
index 41e429c..1f208f4 100644
--- a/module/web/http.scm
+++ b/module/web/http.scm
@@ -1118,7 +1118,7 @@ not have to have a scheme or host name.  The result is a 
URI object."
     (bad-request "Missing Request-URI"))
    ((string= str "*" start end)
     #f)
-   ((eq? (string-ref str start) #\/)
+   ((eqv? (string-ref str start) #\/)
     (let* ((q (string-index str #\? start end))
            (f (string-index str #\# start end))
            (q (and q (or (not f) (< q f)) q)))