From d9bec6ad2d986df1c3aa6248b10b7fc2eddca7b4 Mon Sep 17 00:00:00 2001
From: Marek Paśnikowski <marek@marekpasnikowski.pl>
Date: Fri, 15 Nov 2024 20:27:27 +0100
Subject: refactor(fontutils): isolate definition of antialias rule

---
 suweren/home/services/fontutils.scm | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

(limited to 'suweren')

diff --git a/suweren/home/services/fontutils.scm b/suweren/home/services/fontutils.scm
index b6a1e9a..6acd770 100644
--- a/suweren/home/services/fontutils.scm
+++ b/suweren/home/services/fontutils.scm
@@ -4,6 +4,12 @@
   #:use-module ((gnu services)
                 #:prefix gnu:services:))
 
+(define antialias
+        '(match (@ (target "font"))
+                (edit (@ (mode "assign")
+                         (name "antialias"))
+                      (bool "true"))))
+
 (define (indent-xml level)
         (let* ((depth (* level 2))
                (indentation (make-string depth
@@ -12,11 +18,7 @@
                              indentation)))
 
 (define rules
-        (let* ((antialias '(match (@ (target "font"))
-                (edit (@ (mode "assign")
-                                (name "antialias"))
-                        (bool "true"))))
-               (hinting '(match (@ (target "font"))
+        (let* ((hinting '(match (@ (target "font"))
                 (edit (@ (mode "assign")
                         (name "hinting"))
                         (bool "true"))))
-- 
cgit v1.2.3