doomemacs/modules/lang/rest/config.el

31 lines
1.1 KiB
EmacsLisp
Raw Normal View History

;;; lang/rest/config.el -*- lexical-binding: t; -*-
2017-02-19 18:54:19 -05:00
(def-package! restclient
:mode ("\\.http\\'" . restclient-mode)
:config
(set-popup-rule! "^\\*HTTP Response" :size 0.4 :quit 'other)
;; Forces underlying SSL verification to prompt for self-signed or invalid
;; certs, rather than silently reject them.
(defun +rest*permit-self-signed-ssl (orig-fn &rest args)
(let (gnutls-verify-error tls-checktrust)
(apply orig-fn args)))
(advice-add #'restclient-http-do :around #'+rest*permit-self-signed-ssl)
(map! :mode restclient-mode
:n [M-return] 'restclient-http-send-current
2018-08-16 17:36:05 +02:00
:n "za" #'restclient-toggle-body-visibility
:n "zm" #'+rest/fold-all
:n "zr" #'outline-show-all
:localleader
:desc "Execute HTTP request" :n "e" 'restclient-http-send-current
:desc "Execute raw HTTP request" :n "E" 'restclient-http-send-current-raw
:desc "Copy curl command" :n "c" 'restclient-copy-curl-command))
2017-02-19 18:54:19 -05:00
(def-package! company-restclient
:when (featurep! :completion company)
2017-02-19 18:54:19 -05:00
:after restclient
:config (set-company-backend! 'restclient-mode 'company-restclient))