From 1cc55cbc519d0a7fb6c534a5cca443747cb53038 Mon Sep 17 00:00:00 2001
From: Hans Dijkema <hans@dijkewijk.nl>
Date: Mon, 17 Aug 2026 23:20:06 +0200
Subject: [PATCH] rash-git-cli updates

---
 .gitignore  |  2 ++
 Makefile.mk | 44 ++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 46 insertions(+)
 create mode 100644 Makefile.mk

diff --git a/.gitignore b/.gitignore
index 39a4f9c..d97fa27 100644
--- a/.gitignore
+++ b/.gitignore
@@ -5,6 +5,7 @@
 # DrRacket autosave files
 *.rkt~
 *.rkt.bak
+*.bak
 \#*.rkt#
 \#*.rkt#*#
 
@@ -15,3 +16,4 @@ compiled/
 # Dependency tracking files
 *.dep
 
+doc
\ No newline at end of file
diff --git a/Makefile.mk b/Makefile.mk
new file mode 100644
index 0000000..d5dc909
--- /dev/null
+++ b/Makefile.mk
@@ -0,0 +1,44 @@
+#lang rash
+
+(require rash-coreutils
+         rash-makefile
+         package-zipper
+         "main.rkt")
+
+(makefile rash-git-cli
+  (target all
+          (displayln "make clean, make zip, make status, make sync"))
+
+  (target clean
+          (for-each (λ (f) (displayln f) (rm-f f))
+                    (list-files "." #px"([.]bak|~)$" #:recursive #t))
+          (for-each (λ (d) (displayln d) (rm-rf d))
+                    (list-dirs "." #px"(compiled|doc|docs)$" #:recursive #t))
+          (when (directory-exists? "scribblings")
+                (for-each (λ (f) (displayln f) (rm-f f))
+                          (list-files "scribblings" #px"[.](css|js|html)$")))
+          )
+
+  (target zip
+          (deps clean)
+          (zip-package #:exclude '(".git" ".gitignore")))
+
+  (target status
+          {
+           git status
+               })
+
+  (target sync
+          {
+           git status
+           git add -A
+           git commit
+           git push
+           })
+
+  (target pull
+          {
+           git pull
+               })
+          
+  )