#lang rash

(require rash-coreutils
         rash-makefile
         rash-git-cli
         racket-sprintf)


(makefile racket-wiki
          
          (target all
                  (displayln "Use (make clean), (make ver), (make zip), etc."))

          (target ver
                  (displayln (git* next-version)))

          (target status
                  (map (λ (e)
                          (displayln
                           (sprintf "%-40.40s: %-15.15s %-15.15s"
                                    (caddr e) (cadr e) (car e))))
                       (git 'status)))

          (target sync
                  {
                   git add -A
                   git commit
                   git push
                  })

          (target zip
                  (deps clean)
                  (zip-package #:exclude '("wiki-data")))

          (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))
                  (for-each (λ (f) (displayln f) (rm-f f)) (list-files "scrbl" #px"[.](css|js|html)$"))
                  )

          (target refresh
                  (refresh-makefile))

          )