[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: w3m-expand-url
>> On Thu, 11 Oct 2001 14:09:13 +0900
>> 「渡」== watanabe@sigmaitec.co.jp (渡辺 正 / Tadashi Watanabe) said as follows:
渡> T-gnus の nnshimbun でこの ML を読ませていただいていますが、Meadow
渡> と NT Emacs で Xref: が、
渡> Xref: http://www.namazu.orgc:/~tsuchiya/emacs-w3m/ml/msg01677.html
渡> のようになってしまいます。
以下のパッチでどうでしょうか。
--- w3m.el 2001/10/11 03:31:02 1.423
+++ w3m.el 2001/10/11 06:57:39
@@ -3005,7 +3005,14 @@
(w3m-view-previous-page (if (integerp count) (- count) -1)))
(unless (fboundp 'w3m-expand-path-name)
- (defalias 'w3m-expand-path-name 'expand-file-name))
+ (if (memq system-type '(windows-nt OS/2 emx))
+ (defun w3m-expand-path-name (name &optional base)
+ "Convert path string NAME to the canonicalized one."
+ (let ((x (expand-file-name name base)))
+ (if (string-match "\\`.:" x)
+ (substring x (match-end 0))
+ x)))
+ (defalias 'w3m-expand-path-name 'expand-file-name)))
(defconst w3m-url-components-regexp
"\\`\\(\\([^:/\\?#]+\\):\\)?\\(//\\([^/\\?#]*\\)\\)?\\([^\\?#]*\\)\\(\\?\\([^#]*\\)\\)?\\(#\\(.*\\)\\)?\\'"
;; さっそく、[emacs-w3m:01672] のアドバイスが役に立ちました。有難うご
;; ざいました > 元木さん
--
土屋 雅稔 ( TSUCHIYA Masatoshi )