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

[Mark H. Weaver]

mhw pushed a commit to branch stable-2.0
in repository guile.

commit 622bd8f14b2b150bf2cb1a8becff670681fe9ad5
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 e9fc88a..7b13adc 100644
--- a/module/web/http.scm
+++ b/module/web/http.scm
@@ -1090,7 +1090,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)))