From 727d7759e0a733c4575de5431160fbd090371728 Mon Sep 17 00:00:00 2001
From: Masaya Tojo <masaya@tojo.tokyo>
Date: Thu, 28 Mar 2024 02:48:32 +0900
Subject: Add source column to articles table.

---
 entities/article.rkt | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'entities/article.rkt')

diff --git a/entities/article.rkt b/entities/article.rkt
index 14319d7..4da6cec 100644
--- a/entities/article.rkt
+++ b/entities/article.rkt
@@ -6,6 +6,7 @@
          article-id
          article-timestamp
          article-hash
+         article-source
          article-title
          article-body
 
@@ -18,6 +19,7 @@
 (struct article ([id : String]
                  [timestamp : date]
                  [hash : String]
+                 [source : String]
                  [title : String]
                  [body : String])
   #:type-name Article
@@ -34,6 +36,7 @@
   (make-article-with-tags (article-id a)
                           (article-timestamp a)
                           (article-hash a)
+                          (article-source a)
                           (article-title a)
                           (article-body a)
                           tags))
-- 
cgit v1.2.3