* lisp/ox-publish.el (org-publish-file-relative-name): New function. * lisp/ox-html.el (org-html-link): Use new function. * testing/lisp/test-ox-publish.el (test-org-publish/file-relative-name): New test.