From 3dc554daf926f2c49381861b6667746e53c51d78 Mon Sep 17 00:00:00 2001
From: Siraaj Khandkar <siraaj@khandkar.net>
Date: Mon, 29 Nov 2021 10:10:19 -0500
Subject: [PATCH] Fix indents

---
 tt.rkt | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/tt.rkt b/tt.rkt
index fcaf8ce..a613b58 100644
--- a/tt.rkt
+++ b/tt.rkt
@@ -28,16 +28,16 @@
               (cons 'error β))))
 
 (struct User
-  ([uri  : Url]
-   [nick : (Option String)]))
+        ([uri  : Url]
+         [nick : (Option String)]))
 
 (struct User-Agent
-  ([user : User]
-   [prog : Prog]))
+        ([user : User]
+         [prog : Prog]))
 
 (struct Prog
-  ([name    : String]
-   [version : String]))
+        ([name    : String]
+         [version : String]))
 
 (struct Msg
         ([ts-epoch   : Integer]
@@ -72,8 +72,8 @@
   (match-define (User u0 n) user)
   (define u (url->string u0))
   (if n
-    (format "+~a; @~a" u n)
-    (format "+~a"      u  )))
+      (format "+~a; @~a" u n)
+      (format "+~a"      u  )))
 
 (: user-agent->str (-> User-Agent String))
 (define (user-agent->str ua)
-- 
2.20.1