From d9945d89643ffbb507a5e2cbe88038207a898175 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Mon, 7 Oct 2019 12:57:18 -0400 Subject: [PATCH] autoload/format: add doom-format-indent-increment --- core/autoload/format.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/core/autoload/format.el b/core/autoload/format.el index 8e4df3882..c95440f49 100644 --- a/core/autoload/format.el +++ b/core/autoload/format.el @@ -81,6 +81,9 @@ Any of these classes can be called like functions from within `format!' and (defvar doom-format-indent 0 "Level to rigidly indent text returned by `format!' and `print!'.") +(defvar doom-format-indent-increment 2 + "Steps in which to increment `doom-format-indent' for consecutive levels.") + (defvar doom-format-backend (if noninteractive 'ansi 'text-properties) "Determines whether to print colors with ANSI codes or with text properties. @@ -205,7 +208,7 @@ into faces or ANSI codes depending on the type of sesssion we're in." ;;;###autoload (defmacro print-group! (&rest body) "Indents any `print!' or `format!' output within BODY." - `(let ((doom-format-indent (+ 2 doom-format-indent))) + `(let ((doom-format-indent (+ doom-format-indent-increment doom-format-indent))) ,@body)) ;;;###autoload