2018-10-10 17:55:52 +00:00
|
|
|
#lang racket/base
|
|
|
|
|
(provide (all-defined-out))
|
|
|
|
|
|
|
|
|
|
(define program-name "rodo")
|
2019-03-12 19:00:03 +00:00
|
|
|
(define program-directory (path->string (expand-user-path "~/.rodo/")))
|
2019-07-11 23:45:53 +00:00
|
|
|
(define program-file "to-do.txt")
|
2018-10-10 17:55:52 +00:00
|
|
|
(define remove-command "rm")
|
|
|
|
|
(define add-command "add")
|
|
|
|
|
(define list-command "ls")
|
|
|
|
|
(define initialize-command "init")
|
|
|
|
|
(define help-command '("-h" "--help"))
|
2019-03-13 02:41:18 +00:00
|
|
|
(define path-to-file (string-append program-directory program-file))
|
