diff --git a/api.rkt b/api.rkt index 508cde5..0a2f7e2 100644 --- a/api.rkt +++ b/api.rkt @@ -28,7 +28,7 @@ (define (valid-key? key) ; Check if a key is in the list of valid ones - (memv + (memf (curry equal? key) valid-config-keys)) @@ -45,6 +45,7 @@ (match (map string-trim (string-split line "=")) [(list key val) + (displayln (format "~a - ~a" key val)) (cond [(valid-key? key) (hash-set! config (string->symbol key) val)] [else diff --git a/commit.rkt b/commit.rkt new file mode 100644 index 0000000..4a7f6ee --- /dev/null +++ b/commit.rkt @@ -0,0 +1,3 @@ +#lang racket +(require "api.rkt") +