Add sections to ein-query.el

This commit is contained in:
Takafumi Arakaki 2012-06-08 13:54:39 +02:00
parent 60bf46b929
commit 01143e1f35

View file

@ -31,6 +31,9 @@
(require 'ein-utils)
(require 'ein-log)
;;; Utils
(defun ein:safe-funcall-packed (packed &rest args)
(when packed
(ein:log-ignore-errors (apply #'ein:funcall-packed packed args))))
@ -40,6 +43,8 @@
(declare (indent 1) (debug t))
`(when (buffer-live-p ,buffer) (with-current-buffer ,buffer ,@body)))
;;; Variables
(defcustom ein:query-timeout 5000
"Default query timeout."
@ -49,6 +54,9 @@
(ein:deflocal ein:query-ajax-timer nil)
;;; Functions
(defun* ein:query-ajax (url &rest settings
&key
(cache t)