diff options
author | Jonas Bernoulli <jonas@bernoul.li> | 2020-02-25 14:48:04 +0100 |
---|---|---|
committer | Jonas Bernoulli <jonas@bernoul.li> | 2020-03-27 21:38:45 +0100 |
commit | a11b96fe58a2579e15bfcb642f01e0059da59a87 (patch) | |
tree | 1aa54d25325a9023b1af7cd09d8ed182f1c5b43a /elisp/geiser-xref.el | |
parent | 2a7b84b3cd9e58bba064077af78b53abd30766f6 (diff) | |
download | geiser-a11b96fe58a2579e15bfcb642f01e0059da59a87.tar.gz geiser-a11b96fe58a2579e15bfcb642f01e0059da59a87.tar.bz2 |
Fix indentation
Diffstat (limited to 'elisp/geiser-xref.el')
-rw-r--r-- | elisp/geiser-xref.el | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/elisp/geiser-xref.el b/elisp/geiser-xref.el index 432aa4a..65a57b3 100644 --- a/elisp/geiser-xref.el +++ b/elisp/geiser-xref.el @@ -107,19 +107,19 @@ (defun geiser-xref--display-xrefs (header xrefs) (geiser-xref--with-buffer - (erase-buffer) - (geiser--insert-with-face header 'geiser-font-lock-xref-header) - (newline) - (let ((last-module)) - (dolist (xref (sort xrefs 'geiser-xref--module<)) - (let ((module (format "%s" (cdr (assoc "module" xref))))) - (when (not (equal module last-module)) - (insert "\n In module ") - (geiser--insert-with-face (format "%s" module) - 'geiser-font-lock-xref-header) - (newline 2) - (setq last-module module)) - (geiser-xref--insert-button xref))))) + (erase-buffer) + (geiser--insert-with-face header 'geiser-font-lock-xref-header) + (newline) + (let ((last-module)) + (dolist (xref (sort xrefs 'geiser-xref--module<)) + (let ((module (format "%s" (cdr (assoc "module" xref))))) + (when (not (equal module last-module)) + (insert "\n In module ") + (geiser--insert-with-face (format "%s" module) + 'geiser-font-lock-xref-header) + (newline 2) + (setq last-module module)) + (geiser-xref--insert-button xref))))) (geiser-xref--pop-to-buffer) (goto-char (point-min))) |