Re: DESCRIBE broken after website move

[Lucas B. <luc...@gm...>]

On Mon, Aug 21, 2017 at 9:47 PM, Bruno Haible <br...@cl...> wrote:
> As a consequence of the move from http://clisp.sourceforge.net/
> to https://clisp.sourceforge.io/ the function DESCRIBE is now broken:

Hello. I'm newbie in Lisp, but this error looked interesting, so I
went to take a look at src/clhs.lisp.

I wonder if there's some problem in the function open-http, around line 198:
https://sourceforge.net/p/clisp/clisp/ci/default/tree/src/clhs.lisp#l198

It seems to expect an URL with prefix "http://" but a secure URL with
prefix "https://" is found in the "Location:" header instead, so it
ends up concatenating the strings:

  (unless (string-equal #1# new-url
                        :end2 (min (length new-url) #2#))
    (setq new-url (string-concat #1# host new-url)))