[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:03107] Re: (こっそり) バージョンアップのお知らせ



亀井さん、こんにちは。山本です。

いつもながら、すばやい対応有り難う御座います。


 In message "[xyzzy:03105] (こっそり) バージョンアップのお知らせ"
 Tetsuya wrote:

>   http://www.jsdlab.co.jp/~kamei/xyzzy-0.0.0.97.lzh

新し物好きなので、新機能を試そうとしているのですがとりあえず下の
コードは動きませんでした。もっと精進しないといけないようです。(;_;


(defun poor-http (host file)
  (interactive)
  (let ((st (connect host 80))
	form)
    (write (concat "GET " file " HTTP/1.0\r\n\r\n") :stream st)
    (terpri st)
    (while (setq form (read st nil '#1=:eof))
      (when (eq form #1#)
	(return))
      (insert form))))


-- 
山本真二   sinj@xxxxxxxxxxxx

Index Home