User: stephent
Date: 05/11/26 17:43:54
Modified: packages/unsupported/stephen/curl curl-tests.el
Log:
Improve curl-tests.el.
Revision Changes Path
1.2 +3 -0 XEmacs/packages/unsupported/stephen/curl/curl-tests.el
Index: curl-tests.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/stephen/curl/curl-tests.el,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -p -r1.1 -r1.2
--- curl-tests.el 2005/11/26 16:01:10 1.1
+++ curl-tests.el 2005/11/26 16:43:54 1.2
@@ -1,6 +1,9 @@
;; this file expects to be run from $blddir
+;; it inserts the contents of the resources in the current buffer at point
(require 'curl (expand-file-name "modules/curl/curl"))
(setq handle
(curl-make-url-handle "http://turnbull.sk.tsukuba.ac.jp/index.html"))
+(curl-easy-perform handle)
+;; reuse the handle
(curl-easy-setopt "URL" "http://curl.haxx.se/doc/copyright.html"
handle)
(curl-easy-perform handle)
Show replies by thread