From 727d7759e0a733c4575de5431160fbd090371728 Mon Sep 17 00:00:00 2001 From: Masaya Tojo 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') 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