2019-12-14 00:09:08 +01:00
|
|
|
;;; client.el --- Network clients. -*- lexical-binding: t; -*-
|
2019-11-04 21:10:34 +01:00
|
|
|
|
2019-12-14 00:09:08 +01:00
|
|
|
;; Time-stamp: <2019-12-13T23:08:43+00:00>
|
2019-11-04 21:10:34 +01:00
|
|
|
|
|
|
|
;;; Commentary:
|
|
|
|
|
|
|
|
;;; Code:
|
|
|
|
|
|
|
|
;; Explore and test HTTP REST webservices.
|
|
|
|
(use-package restclient
|
|
|
|
:mode
|
|
|
|
("\\.restclient$" . restclient-mode)
|
|
|
|
)
|
|
|
|
|
|
|
|
;; Company completion for restclient.
|
|
|
|
(use-package company-restclient
|
|
|
|
:after (restclient company)
|
|
|
|
|
|
|
|
:config
|
|
|
|
(add-to-list 'company-backends 'company-restclient)
|
|
|
|
)
|
|
|
|
|
2019-12-14 00:09:08 +01:00
|
|
|
(use-package webpaste
|
|
|
|
:custom
|
|
|
|
(webpaste-provider-priority '("dpaste.org" "dpaste.com"))
|
|
|
|
|
|
|
|
:config
|
|
|
|
(add-to-list
|
|
|
|
'webpaste-providers-alist
|
|
|
|
'("dpaste.org"
|
|
|
|
:uri "https://dpaste.org/api/"
|
|
|
|
:post-data (("expires" . 86400))
|
|
|
|
:post-field "content"
|
|
|
|
:post-lang-field-name "lexer"
|
|
|
|
:lang-overrides ((emacs-lisp-mode . "clojure"))
|
|
|
|
:success-lambda webpaste--providers-success-returned-string))
|
|
|
|
)
|
|
|
|
|
2019-11-04 21:10:34 +01:00
|
|
|
(provide 'net/client)
|
|
|
|
;;; client.el ends here
|