Function: verb-toggle-show-headers

verb-toggle-show-headers is an interactive and natively compiled function defined in verb.el.

Signature

(verb-toggle-show-headers)

Documentation

Show or hide the HTTP response's headers on a separate buffer.

Key Bindings

verb-response-body-mode-map C-c C-r C-r

Source Code

;; Defined in /nix/store/8jnfn8w2mxcxbr2crbklcnija9m0zlkq-emacs-packages-deps/share/emacs/site-lisp/elpa/verb-20260818.1921/verb.el
(defun verb-toggle-show-headers ()
  "Show or hide the HTTP response's headers on a separate buffer."
  (interactive)
  (unless verb-response-body-mode
    (user-error "%s" "This buffer is not showing an HTTP response"))

  (when (and verb--response-headers-buffer
             (not (get-buffer-window verb--response-headers-buffer)))
    (when (buffer-live-p verb--response-headers-buffer)
      (kill-buffer verb--response-headers-buffer))
    (setq verb--response-headers-buffer nil))

  (if verb--response-headers-buffer
      (progn
        (ignore-errors
          (delete-window (get-buffer-window verb--response-headers-buffer)))
        (kill-buffer verb--response-headers-buffer)
        (setq verb--response-headers-buffer nil))
    (setq verb--response-headers-buffer
          (generate-new-buffer "*HTTP Headers*"))
    (let ((headers (oref verb-http-response headers)))
      (with-selected-window (display-buffer
                             verb--response-headers-buffer
                             '(display-buffer-below-selected))
        (verb-response-headers-mode)
        (setq header-line-format (format "HTTP Response Headers | count: %s"
                                         (length headers)))
        (verb--insert-header-contents headers)
        (goto-char (point-min))
        (fit-window-to-buffer)))))