diff options
author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-11-15 20:27:27 +0100 |
---|---|---|
committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-11-15 20:27:27 +0100 |
commit | d9bec6ad2d986df1c3aa6248b10b7fc2eddca7b4 (patch) | |
tree | 3c25f28696c7128be8bef8ffa2c2a9947981e1cb /suweren/home/services/fontutils.scm | |
parent | 2cd9f54396d424b64a6ee1e3dfaefbbf74eef71d (diff) |
refactor(fontutils): isolate definition of antialias rule
Diffstat (limited to 'suweren/home/services/fontutils.scm')
-rw-r--r-- | suweren/home/services/fontutils.scm | 12 |
1 files changed, 7 insertions, 5 deletions
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")))) |