Re: emacs-w3m with XEmacs 21.4.15 on Windows (native, not Cygwin)

[Katsumi Yamaoka <yamaoka@xxxxxxx>]

Hi,

>>>>> In [emacs-w3m : No.06684]
>>>>>	"Schmitt, Christian (ext.)" <Christian.Schmitt@Dresdner-Bank.com> wrote:

> Hi,
> I installed emacs-w3m a couple of weeks ago and really like it.

Thanks for using emacs-w3m!

> One thing was quite annoying, though.

> Whenever emacs-w3m renders a page that contains relative links they wind
> up looking something like this:

> http://some.server\and/a/path/name
> (Note the backslash after the server name)

> Today I got around to looking deeper into it, and I think
> I found a solution. Please take a look at the diff
> below (w3m.el is from emacs-w3m-1.3.90.tar.gz):

[...]

> This patch works for me :-) I hope you find it useful.

I confirmed the default value for directory-sep-char is ?\ in
XEmacs on Windows native.  It seems that it can be simplified as
follows, and I've installed it in the CVS repository just now.

--8<---------------cut here---------------start------------->8---
--- w3m.el~	2004-04-20 00:56:53 +0000
+++ w3m.el	2004-04-22 10:55:20 +0000
@@ -5022,6 +5022,8 @@
 	(let ((inhibit-file-name-handlers '(cygwin-mount-name-hook-function
 					    cygwin-mount-map-drive-hook-function))
 	      (inhibit-file-name-operation 'expand-file-name)
+	      ;; It is ?\ by default in XEmacs on Windows (native, not Cygwin).
+	      (directory-sep-char ?/)
 	      path)
 	  (setq path (expand-file-name name base))
 	  (if (string-match "\\`.:" path)
--8<---------------cut here---------------end--------------->8---

By the way, there is a long-standing item in our todo list; it
may be wrong to use the file-name functions (including
expand-file-name) for url strings.

> Thanks for a great piece of software!

You're welcome.

> Cheers,
> Christian Schmitt

Regards,
-- 
Katsumi Yamaoka <yamaoka@jpl.org>