From 5254bf62431adf2ead6beee0041fe46681749874 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Sun, 17 Nov 2024 01:10:59 +0100 Subject: refactor(fontutils): isolate serif object --- suweren/home/services/fontutils.scm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'suweren') diff --git a/suweren/home/services/fontutils.scm b/suweren/home/services/fontutils.scm index d0e40c1..4670d05 100644 --- a/suweren/home/services/fontutils.scm +++ b/suweren/home/services/fontutils.scm @@ -36,6 +36,10 @@ '(alias (family "sans-serif") (prefer (family "Unifont")))) +(define serif + '(alias (family "serif") + (prefer (family "Unifont"))))) + (define (indent-xml level) (let* ((depth (* level 2)) (indentation (make-string depth @@ -44,9 +48,7 @@ indentation))) (define rules - (let* ((serif '(alias (family "serif") - (prefer (family "Unifont"))))) - (list + (list (indent-xml 1) antialias (indent-xml 1) -- cgit v1.2.3