[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: ViewCVS
- From: Katsumi Yamaoka <yamaoka@xxxxxxx>
- Date: Wed, 13 Feb 2002 18:30:10 +0900
- X-ml-name: emacs-w3m
- X-mail-count: 02798
- References: <yosur8nze2fb.fsf@jpl.org>
>>>>> In [emacs-w3m : No.02726]
>>>>> Katsumi Yamaoka <yamaoka@jpl.org> wrote:
山岡> http://cvs.namazu.org/emacs-w3m/ のページの下端にある
山岡> Download tarball のボタンを押すと、
山岡> emacs-w3m.tar.gz?tarball=1
山岡> というファイルができます。報告だけですみませんが。
ローカルシステムにセーブするファイル名を、以下のように処理すれば
良いでしょうか?
(let ((url "http://cvs.namazu.org/emacs-w3m/emacs-w3m.tar.gz?tarball=1"))
(if (and (string-match w3m-url-components-regexp url)
(match-beginning 6))
;; Strip the query part.
(substring url 0 (match-beginning 6))
url))
=> "http://cvs.namazu.org/emacs-w3m/emacs-w3m.tar.gz"
;; こういうものを w3m.el のどこに組み入れるかで、少々悩みそうで
;; すが。:-p
--
Katsumi Yamaoka <yamaoka@jpl.org>