bug#17217: 24.4.50; eww/shr and relative links

[João Távora]

joaotavora@gmail.com (João Távora) writes:

> Hi maintainers, Lars,
>
>     emacs -Q
>     M-x eww RET\
>         
> http://franz.com/support/documentation/current/doc/classes/excl/compiler-inconsistent-name-usage-warning.htm\
>         RET
>
> Click on any link in the webpage, *eww* always reports 404, because it
> couldn't follow a relative link with href="../../release-notes.htm". A

This patch seems to fix it,

=== modified file 'lisp/net/shr.el'
*** lisp/net/shr.el     2014-03-05 18:44:58 +0000
--- lisp/net/shr.el     2014-04-07 20:59:33 +0000
***************
*** 610,616 ****
         (concat (nth 3 base) url))
        (t
         ;; Totally relative.
!        (concat (car base) (cadr base) url))))
  
  (defun shr-ensure-newline ()
    (unless (zerop (current-column))
--- 610,616 ----
         (concat (nth 3 base) url))
        (t
         ;; Totally relative.
!        (concat (car base) (expand-file-name url (cadr base))))))
  
  (defun shr-ensure-newline ()
    (unless (zerop (current-column))