removed unused requires. thanks racket-trim-requires!
parent
16a432aa28
commit
47cf6aeb6e
5
args.rkt
5
args.rkt
|
@ -1,11 +1,10 @@
|
|||
#lang racket/base
|
||||
|
||||
(require (prefix-in vector: racket/vector)
|
||||
(prefix-in list: racket/list)
|
||||
(prefix-in config: "config.rkt")
|
||||
(prefix-in init: "init.rkt")
|
||||
(prefix-in util: "util.rkt")
|
||||
(prefix-in messages: "messages.rkt"))
|
||||
(prefix-in messages: "messages.rkt")
|
||||
(prefix-in util: "util.rkt"))
|
||||
|
||||
(provide (all-defined-out))
|
||||
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
#lang racket/base
|
||||
#lang racket
|
||||
(provide (all-defined-out))
|
||||
|
||||
(define program-name "rodo")
|
||||
|
|
7
init.rkt
7
init.rkt
|
@ -1,9 +1,8 @@
|
|||
#lang racket/base
|
||||
|
||||
(require (prefix-in file: racket/file)
|
||||
(prefix-in config: "config.rkt")
|
||||
(prefix-in util: "util.rkt")
|
||||
(prefix-in messages: "messages.rkt"))
|
||||
(require (prefix-in config: "config.rkt")
|
||||
(prefix-in messages: "messages.rkt")
|
||||
(prefix-in util: "util.rkt"))
|
||||
|
||||
(provide (all-defined-out))
|
||||
|
||||
|
|
6
util.rkt
6
util.rkt
|
@ -1,7 +1,7 @@
|
|||
#lang racket/base
|
||||
|
||||
(require (prefix-in list: racket/list)
|
||||
(prefix-in file: racket/file)
|
||||
(require (prefix-in file: racket/file)
|
||||
(prefix-in list: racket/list)
|
||||
(prefix-in string: racket/string)
|
||||
(prefix-in config: "config.rkt")
|
||||
(prefix-in messages: "messages.rkt"))
|
||||
|
@ -88,7 +88,7 @@
|
|||
#:exists 'truncate))
|
||||
(display-item-added args))
|
||||
|
||||
;; The cdr here prevents user commands, such as "add" from being added to the file
|
||||
;; The cdr here prevents user commands, such as "add" being added to the file
|
||||
(define (add-item-to-list a-file args)
|
||||
(if (and (program-directory-exists?)
|
||||
(list-file-exists?))
|
||||
|
|
Loading…
Reference in New Issue