browse-url-filename-alist for w32 correction

[Lennart Borgman]

It believe the following change to browse-url-filename-alist will make 
it more correct and useful on w32.

The current value of browse-url-filename-alist gives URL:s that looks 
like "file:c:/some-dir/file.htm". This currently work, but I believe it 
is not supported by ShellExecute.


Index: browse-url.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/browse-url.el,v
retrieving revision 1.52
diff -c -r1.52 browse-url.el
*** browse-url.el    19 Nov 2005 15:57:19 -0000    1.52
--- browse-url.el    27 Dec 2005 12:31:17 -0000
***************
*** 458,464 ****
     ;; applies.
     ("^/\\([^:@address@hidden)?\\([^:]+\\):/*" . "ftp://\\1\\2/";)
     (,@ (if (memq system-type '(windows-nt ms-dos cygwin))
!         '(("^\\([a-zA-Z]:\\)[\\/]" . "file:\\1/")
               ("^[\\/][\\/]+" . "file://"))))
     ("^/+" . "file:/")))
   "*An alist of (REGEXP . STRING) pairs used by `browse-url-of-file'.
--- 458,464 ----
     ;; applies.
     ("^/\\([^:@address@hidden)?\\([^:]+\\):/*" . "ftp://\\1\\2/";)
     (,@ (if (memq system-type '(windows-nt ms-dos cygwin))
!         '(("^\\([a-zA-Z]:\\)[\\/]" . "file:///\\1/")
               ("^[\\/][\\/]+" . "file://"))))
     ("^/+" . "file:/")))
   "*An alist of (REGEXP . STRING) pairs used by `browse-url-of-file'.