; fixme-files **/*.hs docs/devlog.md

; no-debug
; debug

fixme-prefix     FIXME:
fixme-prefix     TODO:
fixme-prefix     PR:
fixme-prefix     REVIEW:

fixme-attribs assigned workflow :class

fixme-attribs class

fixme-attribs :committer-name :commit-time

fixme-value-set :workflow :new :backlog :wip :test :fixed :done :ready :merged

fixme-value-set class hardcode performance boilerplate ui

; fixme-value-set cat bug feat refactor

fixme-value-set scope mvp-0 mvp-1 backlog

fixme-files **/*.txt docs/devlog.md
fixme-files **/*.hs
fixme-exclude **/.**
fixme-exclude dist-newstyle
fixme-exclude miscellaneous

fixme-file-comments "*.scm" ";"

fixme-comments ";" "--"

(define-template short
  (quot
    (simple
         (trim 10  $fixme-key) " "

         (if (~ FIXME $fixme-tag)
          (then (fgd red (align 6  $fixme-tag))  )
          (else (if (~ TODO $fixme-tag)
                  (then (fgd green (align 6  $fixme-tag)))
                  (else (align 6  $fixme-tag)) ) )
          )


         (align 10  ("[" $workflow "]"))  " "
         (align 8  $class)  " "
         (align 12 $assigned)  " "
         (align 20 (trim 20 $committer-name)) " "
         (trim 40  ($fixme-title)) " "
         (nl))
    )
)

(set-template default short)

(define (ls) (report))

(define (lss s) (report workflow ~ s))

(define (done s) (modify s workflow :done))
(define (wip s) (modify s workflow :wip))
(define (test s) (modify s workflow :test))
(define (new s) (modify s workflow :new))
(define (backlog s) (modify s workflow :backlog))
(define (ready s) (modify s workflow :ready))
(define (merged s) (modify s workflow :merged))
(define (assign s who) (modify s :assigned who))

;; refchan settings
refchan 3WtddmcE8zzgBAPR7Bu7mKMaVMTN423NNXSPUJp3Hx42
source ./refchan.local