rodo/config.rkt

40 lines
991 B
Racket
Raw Normal View History

2019-11-13 15:51:28 +00:00
#lang racket/base
(provide (all-defined-out))
(define file-name "list.txt")
(define program-name "rodo")
2019-11-13 21:00:45 +00:00
2019-11-04 02:32:11 +00:00
(define program-directory
(path->string
2019-11-13 21:00:45 +00:00
(expand-user-path
(string-append "~/." program-name "/"))))
2019-11-15 12:37:40 +00:00
(define list-file
(string-append program-directory file-name))
2019-11-13 21:00:45 +00:00
;; TODO: pluralize this value's name
2019-11-13 21:00:45 +00:00
(define help-command '("-h"
"--help"
"h"
"help"))
;; TODO: pluralize this value's name
2019-11-13 21:00:45 +00:00
(define initialize-command '("init"
"create"
"start"
"begin"))
;; TODO: pluralize this value's name
2019-11-13 21:00:45 +00:00
(define add-command '("add"
"a"))
;; TODO: pluralize this value's name
2019-11-13 21:00:45 +00:00
(define list-command '("ls"
"list"))
;; TODO: pluralize this value's name
2019-11-13 21:00:45 +00:00
(define remove-command '("rm"
"remove"
"del"
"delete"))