From 3146caed5abe1185eb77dcfcbe13455d63b1e162 Mon Sep 17 00:00:00 2001
From: Luis Guilherme Coelho <lgcoelho@disroot.org>
Date: Thu, 4 Apr 2024 07:46:23 -0300
Subject: [PATCH] home-services: shells: Use singlequotes when serializing
 aliases and abbreviation regexes

---
 radix/home/services/shells.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/radix/home/services/shells.scm b/radix/home/services/shells.scm
index b270186..407da00 100644
--- a/radix/home/services/shells.scm
+++ b/radix/home/services/shells.scm
@@ -35,7 +35,7 @@
   #~(string-append
      #$@(map (match-lambda
                ((key . value)
-                #~(string-append "alias " #$key " \"" #$value "\"\n"))
+                #~(string-append "alias '" #$key "' \"" #$value "\"\n"))
                (_ ""))
              val)))
 
@@ -69,7 +69,7 @@
                #~((@@ (ice-9 format) format) #f
                    "~%abbr --add '~a' \\~%~
                    ~@[     --position ~a \\~%~]~
-                   ~@[     --regex \"~a\" \\~%~]~
+                   ~@[     --regex '~a' \\~%~]~
                    ~@[     --set-cursor=~a \\~%~]~
                    ~@[     ~a~]~%"
                    '#$name